



; bank 0x0F of 16 starts at file address 0x03C010
; code bytes:	$3C56 (94.27% of bytes in this ROM bank)
; data bytes:	$035F (5.27% of bytes in this ROM bank)
; pcm bytes:	$0000 (0.00% of bytes in this ROM bank)
; chr bytes:	$0000 (0.00% of bytes in this ROM bank)
; free bytes:	$0023 (0.21% of bytes in this ROM bank)
; unknown bytes:	$002A (0.26% of bytes in this ROM bank)
; $003B bytes last seen in RAM bank $8000 - $BFFF (0.36% of bytes seen in this ROM bank, 0.36% of bytes in this ROM bank):
;	$002E code bytes (77.97% of bytes seen in this RAM bank, 0.28% of bytes in this ROM bank)
;	$000D data bytes (22.03% of bytes seen in this RAM bank, 0.08% of bytes in this ROM bank)
; $3F78 bytes last seen in RAM bank $C000 - $FFFF (99.64% of bytes seen in this ROM bank, 99.17% of bytes in this ROM bank):
;	$3C28 code bytes (94.78% of bytes seen in this RAM bank, 93.99% of bytes in this ROM bank)
;	$0352 data bytes (5.23% of bytes seen in this RAM bank, 5.19% of bytes in this ROM bank)

; PRG Bank 0x0F: the fixed bank, contains a little bit of everything

; [bank start] -> code
; NMI vector
; indirect control flow target (via $FFFA)
0x03C010|$0F:$C000:78      	SEI        
0x03C011|$0F:$C001:48      	PHA        
0x03C012|$0F:$C002:98      	TYA        
0x03C013|$0F:$C003:48      	PHA        
0x03C014|$0F:$C004:8A      	TXA        
0x03C015|$0F:$C005:48      	PHA        
0x03C016|$0F:$C006:AD 07 60	LDA $6007  
0x03C019|$0F:$C009:D0 0A   	BNE $C015  
0x03C01B|$0F:$C00B:A5 93   	LDA $93    	; NMI counter, decremented once per NMI until it reaches 0
0x03C01D|$0F:$C00D:F0 02   	BEQ $C011  
0x03C01F|$0F:$C00F:C6 93   	DEC $93    	; NMI counter, decremented once per NMI until it reaches 0
; control flow target (from $C00D)
0x03C021|$0F:$C011:A4 00   	LDY $00    
0x03C023|$0F:$C013:10 03   	BPL $C018  
; control flow target (from $C009)
0x03C025|$0F:$C015:4C C3 C0	JMP $C0C3  

; control flow target (from $C013)
0x03C028|$0F:$C018:AD 45 61	LDA $6145  
0x03C02B|$0F:$C01B:10 03   	BPL $C020  
0x03C02D|$0F:$C01D:4C 48 C1	JMP $C148  

; control flow target (from $C01B)
0x03C030|$0F:$C020:A4 00   	LDY $00    
0x03C032|$0F:$C022:F0 5C   	BEQ $C080  
0x03C034|$0F:$C024:88      	DEY        
0x03C035|$0F:$C025:F0 59   	BEQ $C080  
0x03C037|$0F:$C027:88      	DEY        
; control flow target (from $C07C)
0x03C038|$0F:$C028:B9 38 C1	LDA $C138,Y
0x03C03B|$0F:$C02B:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C03E|$0F:$C02E:C8      	INY        
0x03C03F|$0F:$C02F:B9 38 C1	LDA $C138,Y
0x03C042|$0F:$C032:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C045|$0F:$C035:C8      	INY        
0x03C046|$0F:$C036:A9 5F   	LDA #$5F   
0x03C048|$0F:$C038:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C04B|$0F:$C03B:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C04E|$0F:$C03E:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C051|$0F:$C041:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C054|$0F:$C044:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C057|$0F:$C047:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C05A|$0F:$C04A:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C05D|$0F:$C04D:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C060|$0F:$C050:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C063|$0F:$C053:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C066|$0F:$C056:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C069|$0F:$C059:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C06C|$0F:$C05C:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C06F|$0F:$C05F:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C072|$0F:$C062:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C075|$0F:$C065:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C078|$0F:$C068:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C07B|$0F:$C06B:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C07E|$0F:$C06E:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C081|$0F:$C071:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C084|$0F:$C074:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C087|$0F:$C077:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C08A|$0F:$C07A:C0 10   	CPY #$10   
0x03C08C|$0F:$C07C:D0 AA   	BNE $C028  
0x03C08E|$0F:$C07E:F0 31   	BEQ $C0B1  
; control flow target (from $C022, $C025)
0x03C090|$0F:$C080:AD 83 01	LDA $0183  
0x03C093|$0F:$C083:F0 03   	BEQ $C088  
0x03C095|$0F:$C085:4C A0 C1	JMP $C1A0  

; control flow target (from $C083)
0x03C098|$0F:$C088:A5 02   	LDA $02    
0x03C09A|$0F:$C08A:C9 18   	CMP #$18   
0x03C09C|$0F:$C08C:B0 05   	BCS $C093  
0x03C09E|$0F:$C08E:A9 02   	LDA #$02   
0x03C0A0|$0F:$C090:8D 14 40	STA $4014  	; Sprite DMA Register (copy $100 bytes from $100 * N)
; control flow target (from $C08C)
0x03C0A3|$0F:$C093:A2 00   	LDX #$00   
; control flow target (from $C0AE)
0x03C0A5|$0F:$C095:E4 02   	CPX $02    
0x03C0A7|$0F:$C097:F0 18   	BEQ $C0B1  
0x03C0A9|$0F:$C099:BD 00 03	LDA $0300,X	; PPU write buffer start
0x03C0AC|$0F:$C09C:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C0AF|$0F:$C09F:E8      	INX        
0x03C0B0|$0F:$C0A0:BD 00 03	LDA $0300,X	; PPU write buffer start
0x03C0B3|$0F:$C0A3:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C0B6|$0F:$C0A6:E8      	INX        
0x03C0B7|$0F:$C0A7:BD 00 03	LDA $0300,X	; PPU write buffer start
0x03C0BA|$0F:$C0AA:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C0BD|$0F:$C0AD:E8      	INX        
0x03C0BE|$0F:$C0AE:4C 95 C0	JMP $C095  

; control flow target (from $C07E, $C097, $C19D, $C1D9)
0x03C0C1|$0F:$C0B1:A9 00   	LDA #$00   
0x03C0C3|$0F:$C0B3:85 01   	STA $01    
0x03C0C5|$0F:$C0B5:85 02   	STA $02    
0x03C0C7|$0F:$C0B7:8D 83 01	STA $0183  
0x03C0CA|$0F:$C0BA:20 03 C1	JSR $C103  
0x03C0CD|$0F:$C0BD:A9 00   	LDA #$00   
0x03C0CF|$0F:$C0BF:85 00   	STA $00    
0x03C0D1|$0F:$C0C1:E6 03   	INC $03    	; game clock?
; control flow target (from $C015)
0x03C0D3|$0F:$C0C3:20 0B C6	JSR $C60B  	; initialize MMC control mode and CHR banks
0x03C0D6|$0F:$C0C6:A9 03   	LDA #$03   
0x03C0D8|$0F:$C0C8:20 D8 C3	JSR $C3D8  	; CLI and load bank specified by A
; call to code in a different bank ($03:$8000)
0x03C0DB|$0F:$C0CB:20 00 80	JSR $8000  
0x03C0DE|$0F:$C0CE:AD F6 05	LDA $05F6  	; current bank
0x03C0E1|$0F:$C0D1:20 D8 C3	JSR $C3D8  	; CLI and load bank specified by A
0x03C0E4|$0F:$C0D4:BA      	TSX        
; ummm... skipping X/Y/A on stack, if second caller is $FFC0 - $FFD4 inclusive, mess around with stack, pull X/Y/A, clobber A with current bank, and RTI
; else pull X/Y/A and RTI
0x03C0E5|$0F:$C0D5:BD 06 01	LDA $0106,X
0x03C0E8|$0F:$C0D8:C9 FF   	CMP #$FF   
0x03C0EA|$0F:$C0DA:D0 21   	BNE $C0FD  
0x03C0EC|$0F:$C0DC:BD 05 01	LDA $0105,X
0x03C0EF|$0F:$C0DF:C9 C0   	CMP #$C0   
0x03C0F1|$0F:$C0E1:90 1A   	BCC $C0FD  
0x03C0F3|$0F:$C0E3:C9 D5   	CMP #$D5   
0x03C0F5|$0F:$C0E5:B0 16   	BCS $C0FD  
0x03C0F7|$0F:$C0E7:A9 04   	LDA #$04   
0x03C0F9|$0F:$C0E9:1D 04 01	ORA $0104,X
0x03C0FC|$0F:$C0EC:9D 04 01	STA $0104,X
0x03C0FF|$0F:$C0EF:A9 C0   	LDA #$C0   
0x03C101|$0F:$C0F1:9D 05 01	STA $0105,X
0x03C104|$0F:$C0F4:68      	PLA        
0x03C105|$0F:$C0F5:AA      	TAX        
0x03C106|$0F:$C0F6:68      	PLA        
0x03C107|$0F:$C0F7:A8      	TAY        
0x03C108|$0F:$C0F8:68      	PLA        
0x03C109|$0F:$C0F9:AD F6 05	LDA $05F6  	; current bank
0x03C10C|$0F:$C0FC:40      	RTI        

; control flow target (from $C0DA, $C0E1, $C0E5)
0x03C10D|$0F:$C0FD:68      	PLA        
0x03C10E|$0F:$C0FE:AA      	TAX        
0x03C10F|$0F:$C0FF:68      	PLA        
0x03C110|$0F:$C100:A8      	TAY        
0x03C111|$0F:$C101:68      	PLA        
0x03C112|$0F:$C102:40      	RTI        

; control flow target (from $C0BA)
0x03C113|$0F:$C103:A9 3F   	LDA #$3F   
0x03C115|$0F:$C105:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C118|$0F:$C108:A9 00   	LDA #$00   
0x03C11A|$0F:$C10A:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C11D|$0F:$C10D:A5 30   	LDA $30    
0x03C11F|$0F:$C10F:29 0F   	AND #$0F   
0x03C121|$0F:$C111:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C124|$0F:$C114:A9 00   	LDA #$00   
0x03C126|$0F:$C116:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C129|$0F:$C119:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C12C|$0F:$C11C:A5 04   	LDA $04    
0x03C12E|$0F:$C11E:D0 05   	BNE $C125  
0x03C130|$0F:$C120:AD AE 61	LDA $61AE  
0x03C133|$0F:$C123:D0 03   	BNE $C128  
; control flow target (from $C11E)
0x03C135|$0F:$C125:AD AF 61	LDA $61AF  
; control flow target (from $C123)
0x03C138|$0F:$C128:09 80   	ORA #$80   
0x03C13A|$0F:$C12A:8D 00 20	STA $2000  	; PPU Control Register #1 (#$80: Execute NMI on VBlank, #$40: unused, #$20: Sprite Size [8x8/8x16], #$10: Background Pattern Table Address [$0000/$1000], #$08: Sprite Pattern Table Address [$0000/$1000], #$04: PPU Address Increment [1/32], #$03: Name Table Address [$2000/$2400/$2800/$2C00])
0x03C13D|$0F:$C12D:A5 05   	LDA $05    
0x03C13F|$0F:$C12F:8D 05 20	STA $2005  	; VRAM Address Register #1 (write twice; BG scroll)
0x03C142|$0F:$C132:A5 06   	LDA $06    
0x03C144|$0F:$C134:8D 05 20	STA $2005  	; VRAM Address Register #1 (write twice; BG scroll)
0x03C147|$0F:$C137:60      	RTS        


; code -> data
; PPU addresses
; indexed data load target (from $C028, $C02F)
0x03C148|$0F:$C138:22 65
0x03C14A|$0F:$C13A:22 85
0x03C14C|$0F:$C13C:22 A5
0x03C14E|$0F:$C13E:22 C5
0x03C150|$0F:$C140:22 E5
0x03C152|$0F:$C142:23 05
0x03C154|$0F:$C144:23 25
0x03C156|$0F:$C146:23 45

; data -> code
; control flow target (from $C01D)
0x03C158|$0F:$C148:A2 00   	LDX #$00   
0x03C15A|$0F:$C14A:A4 01   	LDY $01    
0x03C15C|$0F:$C14C:F0 4C   	BEQ $C19A  
; control flow target (from $C198)
0x03C15E|$0F:$C14E:BD 00 03	LDA $0300,X	; PPU write buffer start
0x03C161|$0F:$C151:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C164|$0F:$C154:BD 01 03	LDA $0301,X
0x03C167|$0F:$C157:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C16A|$0F:$C15A:BD 02 03	LDA $0302,X
0x03C16D|$0F:$C15D:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C170|$0F:$C160:BD 03 03	LDA $0303,X
0x03C173|$0F:$C163:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C176|$0F:$C166:BD 00 03	LDA $0300,X	; PPU write buffer start
0x03C179|$0F:$C169:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C17C|$0F:$C16C:BD 01 03	LDA $0301,X
0x03C17F|$0F:$C16F:09 20   	ORA #$20   
0x03C181|$0F:$C171:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C184|$0F:$C174:BD 04 03	LDA $0304,X
0x03C187|$0F:$C177:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C18A|$0F:$C17A:BD 05 03	LDA $0305,X
0x03C18D|$0F:$C17D:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C190|$0F:$C180:BD 06 03	LDA $0306,X
0x03C193|$0F:$C183:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C196|$0F:$C186:BD 07 03	LDA $0307,X
0x03C199|$0F:$C189:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C19C|$0F:$C18C:BD 08 03	LDA $0308,X
0x03C19F|$0F:$C18F:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C1A2|$0F:$C192:8A      	TXA        
0x03C1A3|$0F:$C193:18      	CLC        
0x03C1A4|$0F:$C194:69 09   	ADC #$09   
0x03C1A6|$0F:$C196:AA      	TAX        
0x03C1A7|$0F:$C197:88      	DEY        
0x03C1A8|$0F:$C198:D0 B4   	BNE $C14E  
; control flow target (from $C14C)
0x03C1AA|$0F:$C19A:8C 45 61	STY $6145  
0x03C1AD|$0F:$C19D:4C B1 C0	JMP $C0B1  

; control flow target (from $C085)
0x03C1B0|$0F:$C1A0:A2 00   	LDX #$00   
0x03C1B2|$0F:$C1A2:AD 02 20	LDA $2002  	; PPU Status Register (#$80: In VBlank, #$40: Sprite #0 Hit, #$20: Scanline Sprite Count > 8, #$10: Ignore VRAM Writes); after read, #$80 and $2005-$2006 are reset
0x03C1B5|$0F:$C1A5:A5 02   	LDA $02    
0x03C1B7|$0F:$C1A7:F0 26   	BEQ $C1CF  
; control flow target (from $C1CD)
0x03C1B9|$0F:$C1A9:A0 01   	LDY #$01   
0x03C1BB|$0F:$C1AB:BD 00 03	LDA $0300,X	; PPU write buffer start
0x03C1BE|$0F:$C1AE:10 04   	BPL $C1B4  
0x03C1C0|$0F:$C1B0:E8      	INX        
0x03C1C1|$0F:$C1B1:BC 00 03	LDY $0300,X	; PPU write buffer start
; control flow target (from $C1AE)
0x03C1C4|$0F:$C1B4:E8      	INX        
0x03C1C5|$0F:$C1B5:29 3F   	AND #$3F   
0x03C1C7|$0F:$C1B7:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C1CA|$0F:$C1BA:BD 00 03	LDA $0300,X	; PPU write buffer start
0x03C1CD|$0F:$C1BD:E8      	INX        
0x03C1CE|$0F:$C1BE:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
; control flow target (from $C1C9)
0x03C1D1|$0F:$C1C1:BD 00 03	LDA $0300,X	; PPU write buffer start
0x03C1D4|$0F:$C1C4:E8      	INX        
0x03C1D5|$0F:$C1C5:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C1D8|$0F:$C1C8:88      	DEY        
0x03C1D9|$0F:$C1C9:D0 F6   	BNE $C1C1  
0x03C1DB|$0F:$C1CB:C6 01   	DEC $01    
0x03C1DD|$0F:$C1CD:D0 DA   	BNE $C1A9  
; control flow target (from $C1A7)
0x03C1DF|$0F:$C1CF:AD 08 60	LDA $6008  
0x03C1E2|$0F:$C1D2:D0 05   	BNE $C1D9  
0x03C1E4|$0F:$C1D4:A9 02   	LDA #$02   
0x03C1E6|$0F:$C1D6:8D 14 40	STA $4014  	; Sprite DMA Register (copy $100 bytes from $100 * N)
; control flow target (from $C1D2)
0x03C1E9|$0F:$C1D9:4C B1 C0	JMP $C0B1  

; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $C1EE, $C22C, $C23F, $C30A, $C3E8, $C421, $C465, $C595, $C67D, $C747, $C7EC, $C975, $C9A8, $CCD9, $CFA5, $D0E2, $D13D, $D317, $D48C, $D65B, $D6EE, $D72B, $D73F, $E2B8, $E2CE, $E5EC, $E609, $E660, $E69D, $E6D6, $E6EC, $E719, $E743, $E764, $E7B7, $E7EA, $E817, $E841, $E862, $E972, $E980, $E9F9, $EB6D, $F476, $F862, $F868, $FB05, $FD08, $FD9C)
; external control flow target (from $00:$803C, $00:$807B, $00:$8328, $00:$83A4, $00:$B783, $00:$B80A, $00:$B822, $00:$B95C, $02:$AB9B, $02:$B1FA, $02:$B717, $04:$8CE9, $04:$8D9B, $04:$8DE1, $04:$8E02, $04:$8E05, $04:$8E3F, $04:$8E9A, $04:$8EAE, $04:$8EB1, $04:$8FE7, $04:$902C, $04:$909B, $04:$90B7, $04:$99F9, $04:$9A39, $06:$8048, $06:$8905, $06:$8929, $06:$895F, $06:$8988, $06:$A262, $06:$A270, $06:$A273, $06:$A617, $06:$A620, $06:$A984, $06:$AF9B, $06:$B21B, $07:$81C3, $07:$8654, $07:$86E5, $07:$8715, $07:$8908, $07:$89BD, $07:$89CF, $08:$804F, $08:$8296, $08:$832E, $09:$802D, $09:$8070, $09:$8098, $09:$80CC, $09:$80DD, $09:$82A0, $09:$82EA, $09:$82ED, $09:$8310, $09:$8313, $09:$9E19, $09:$9EFB, $09:$9F59, $09:$9F95, $09:$9FFC, $09:$A02E, $09:$A03F, $09:$A07D, $09:$A0F3, $0A:$8049, $0A:$81DF)
0x03C1EC|$0F:$C1DC:A9 00   	LDA #$00   
0x03C1EE|$0F:$C1DE:8D 07 60	STA $6007  
0x03C1F1|$0F:$C1E1:A9 01   	LDA #$01   
0x03C1F3|$0F:$C1E3:85 00   	STA $00    
; control flow target (from $C1E7)
0x03C1F5|$0F:$C1E5:A5 00   	LDA $00    
0x03C1F7|$0F:$C1E7:D0 FC   	BNE $C1E5  
0x03C1F9|$0F:$C1E9:A9 FF   	LDA #$FF   
0x03C1FB|$0F:$C1EB:85 00   	STA $00    
0x03C1FD|$0F:$C1ED:60      	RTS        

; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
; control flow target (from $C1F2, $C329, $C520, $C592, $C5A5, $C6A5, $C82C, $C83B, $CAE6, $CC4A, $CD74, $CD83, $D0F9, $D5D7, $FC3A)
; external control flow target (from $00:$B7B5, $00:$B8BF, $04:$9019, $06:$824C, $06:$8A57, $06:$8B01, $06:$96AD, $06:$96C0, $06:$970E, $06:$97CB, $06:$98F5, $06:$9941, $06:$A2EB, $06:$A316, $06:$BBEC, $06:$BC3A, $06:$BC88, $06:$BD1E, $06:$BD76, $06:$BD86, $06:$BD93, $07:$81CB, $07:$81F0, $07:$81F9, $07:$85C8, $07:$863F, $07:$866D, $07:$8672, $07:$867A, $07:$867F, $07:$898F, $09:$8002, $09:$80A4, $09:$80D7, $09:$9E13, $09:$9E4C, $09:$9E5B, $09:$9E62, $09:$9F44, $09:$9FDC, $0A:$801C, $0A:$8024, $0A:$8038)
0x03C1FE|$0F:$C1EE:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03C201|$0F:$C1F1:CA      	DEX        
0x03C202|$0F:$C1F2:D0 FA   	BNE $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03C204|$0F:$C1F4:60      	RTS        

; wait for battle message delay to expire
; control flow target (from $C1F7)
; external control flow target (from $04:$9A13)
0x03C205|$0F:$C1F5:A5 93   	LDA $93    	; NMI counter, decremented once per NMI until it reaches 0
0x03C207|$0F:$C1F7:D0 FC   	BNE $C1F5  	; wait for battle message delay to expire
0x03C209|$0F:$C1F9:60      	RTS        

; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
; control flow target (from $C1FE, $C2C9, $D65E, $D661, $D66F, $D672, $DEBA, $DED7, $DEE7, $DF03, $DF14, $DF3D, $FD26, $FD99)
; external control flow target (from $00:$83AC, $00:$B95F, $02:$B74F, $04:$8D92, $04:$8DD8, $04:$8E91, $04:$909E, $04:$9A36, $06:$8996, $06:$AF73, $06:$B0A9, $07:$897A, $07:$8A90, $09:$8089, $09:$81ED)
0x03C20A|$0F:$C1FA:A6 02   	LDX $02    
0x03C20C|$0F:$C1FC:E0 C0   	CPX #$C0   
0x03C20E|$0F:$C1FE:F0 FA   	BEQ $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00; wait for $02 to not be #$C0
0x03C210|$0F:$C200:A5 08   	LDA $08    	; PPU address, high byte
0x03C212|$0F:$C202:9D 00 03	STA $0300,X	; PPU write buffer start
0x03C215|$0F:$C205:E8      	INX        
0x03C216|$0F:$C206:A5 07   	LDA $07    	; PPU address, low byte
0x03C218|$0F:$C208:9D 00 03	STA $0300,X	; PPU write buffer start
0x03C21B|$0F:$C20B:E8      	INX        
0x03C21C|$0F:$C20C:A5 09   	LDA $09    	; PPU tile ID
0x03C21E|$0F:$C20E:9D 00 03	STA $0300,X	; PPU write buffer start
0x03C221|$0F:$C211:E8      	INX        
0x03C222|$0F:$C212:E6 01   	INC $01    
0x03C224|$0F:$C214:86 02   	STX $02    
0x03C226|$0F:$C216:E6 07   	INC $07    	; INC 16-bit PPU address $07-$08
0x03C228|$0F:$C218:D0 02   	BNE $C21C  
0x03C22A|$0F:$C21A:E6 08   	INC $08    
; control flow target (from $C218)
0x03C22C|$0F:$C21C:48      	PHA        
0x03C22D|$0F:$C21D:A9 00   	LDA #$00   
0x03C22F|$0F:$C21F:8D 83 01	STA $0183  
0x03C232|$0F:$C222:68      	PLA        
0x03C233|$0F:$C223:60      	RTS        

; control flow target (from $C315)
0x03C234|$0F:$C224:A9 10   	LDA #$10   
0x03C236|$0F:$C226:D0 24   	BNE $C24C  
; control flow target (from $C324)
; external control flow target (from $06:$A284, $07:$8668)
0x03C238|$0F:$C228:A9 00   	LDA #$00   
0x03C23A|$0F:$C22A:F0 20   	BEQ $C24C  
; external control flow target (from $00:$B92E, $04:$8738, $04:$90D1, $04:$90D7, $04:$A0F5, $06:$866C, $06:$8BF0, $06:$8CC5, $06:$9431, $06:$951F, $06:$95F6, $06:$A1ED, $06:$AEB4, $06:$BD53)
0x03C23C|$0F:$C22C:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03C23F|$0F:$C22F:A9 00   	LDA #$00   
0x03C241|$0F:$C231:85 0C   	STA $0C    
0x03C243|$0F:$C233:A2 02   	LDX #$02   
0x03C245|$0F:$C235:20 42 C2	JSR $C242  
0x03C248|$0F:$C238:A2 00   	LDX #$00   
0x03C24A|$0F:$C23A:A9 10   	LDA #$10   
0x03C24C|$0F:$C23C:20 42 C2	JSR $C242  
0x03C24F|$0F:$C23F:4C DC C1	JMP $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF

; control flow target (from $C235, $C23C)
0x03C252|$0F:$C242:BC E7 C2	LDY $C2E7,X
0x03C255|$0F:$C245:84 0A   	STY $0A    
0x03C257|$0F:$C247:BC E8 C2	LDY $C2E8,X
0x03C25A|$0F:$C24A:84 0B   	STY $0B    
; control flow target (from $C226, $C22A)
0x03C25C|$0F:$C24C:85 07   	STA $07    
0x03C25E|$0F:$C24E:A9 3F   	LDA #$3F   
0x03C260|$0F:$C250:85 08   	STA $08    
0x03C262|$0F:$C252:A0 01   	LDY #$01   
; control flow target (from $C266)
0x03C264|$0F:$C254:A5 30   	LDA $30    
0x03C266|$0F:$C256:29 0F   	AND #$0F   
0x03C268|$0F:$C258:20 BE C2	JSR $C2BE  
0x03C26B|$0F:$C25B:20 69 C2	JSR $C269  
0x03C26E|$0F:$C25E:20 BB C2	JSR $C2BB  
0x03C271|$0F:$C261:20 BB C2	JSR $C2BB  
0x03C274|$0F:$C264:C0 0D   	CPY #$0D   
0x03C276|$0F:$C266:D0 EC   	BNE $C254  
0x03C278|$0F:$C268:60      	RTS        

; control flow target (from $C25B)
0x03C279|$0F:$C269:A5 30   	LDA $30    
0x03C27B|$0F:$C26B:30 4E   	BMI $C2BB  
0x03C27D|$0F:$C26D:A5 07   	LDA $07    
0x03C27F|$0F:$C26F:C9 01   	CMP #$01   
0x03C281|$0F:$C271:D0 48   	BNE $C2BB  
0x03C283|$0F:$C273:18      	CLC        
0x03C284|$0F:$C274:08      	PHP        
0x03C285|$0F:$C275:A2 00   	LDX #$00   
; control flow target (from $C2B1)
0x03C287|$0F:$C277:BD 2D 06	LDA $062D,X	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03C28A|$0F:$C27A:0A      	ASL        
0x03C28B|$0F:$C27B:29 08   	AND #$08   
0x03C28D|$0F:$C27D:F0 2B   	BEQ $C2AA  
0x03C28F|$0F:$C27F:B0 06   	BCS $C287  
0x03C291|$0F:$C281:28      	PLP        
0x03C292|$0F:$C282:A9 26   	LDA #$26   
0x03C294|$0F:$C284:4C BD C2	JMP $C2BD  

; control flow target (from $C27F)
0x03C297|$0F:$C287:BD 30 06	LDA $0630,X	; Midenhall Max HP low byte
0x03C29A|$0F:$C28A:48      	PHA        
0x03C29B|$0F:$C28B:BD 31 06	LDA $0631,X	; Midenhall Max HP high byte
0x03C29E|$0F:$C28E:4A      	LSR        
0x03C29F|$0F:$C28F:7E 30 06	ROR $0630,X	; Midenhall Max HP low byte
0x03C2A2|$0F:$C292:4A      	LSR        
0x03C2A3|$0F:$C293:7E 30 06	ROR $0630,X	; Midenhall Max HP low byte
0x03C2A6|$0F:$C296:DD 3C 06	CMP $063C,X	; Midenhall Current HP, high byte
0x03C2A9|$0F:$C299:D0 06   	BNE $C2A1  
0x03C2AB|$0F:$C29B:BD 30 06	LDA $0630,X	; Midenhall Max HP low byte
0x03C2AE|$0F:$C29E:DD 3B 06	CMP $063B,X	; Midenhall Current HP, low byte
; control flow target (from $C299)
0x03C2B1|$0F:$C2A1:68      	PLA        
0x03C2B2|$0F:$C2A2:9D 30 06	STA $0630,X	; Midenhall Max HP low byte
0x03C2B5|$0F:$C2A5:90 03   	BCC $C2AA  
0x03C2B7|$0F:$C2A7:28      	PLP        
0x03C2B8|$0F:$C2A8:38      	SEC        
0x03C2B9|$0F:$C2A9:08      	PHP        
; control flow target (from $C27D, $C2A5)
0x03C2BA|$0F:$C2AA:8A      	TXA        
0x03C2BB|$0F:$C2AB:18      	CLC        
0x03C2BC|$0F:$C2AC:69 12   	ADC #$12   
0x03C2BE|$0F:$C2AE:AA      	TAX        
0x03C2BF|$0F:$C2AF:C9 36   	CMP #$36   
0x03C2C1|$0F:$C2B1:90 C4   	BCC $C277  
0x03C2C3|$0F:$C2B3:28      	PLP        
0x03C2C4|$0F:$C2B4:90 05   	BCC $C2BB  
0x03C2C6|$0F:$C2B6:A9 37   	LDA #$37   
0x03C2C8|$0F:$C2B8:4C BD C2	JMP $C2BD  

; control flow target (from $C25E, $C261, $C26B, $C271, $C2B4)
0x03C2CB|$0F:$C2BB:B1 0A   	LDA ($0A),Y
; control flow target (from $C284, $C2B8)
0x03C2CD|$0F:$C2BD:C8      	INY        
; control flow target (from $C258)
0x03C2CE|$0F:$C2BE:38      	SEC        
0x03C2CF|$0F:$C2BF:E5 0C   	SBC $0C    
0x03C2D1|$0F:$C2C1:B0 04   	BCS $C2C7  
0x03C2D3|$0F:$C2C3:A5 30   	LDA $30    
0x03C2D5|$0F:$C2C5:29 0F   	AND #$0F   
; control flow target (from $C2C1)
0x03C2D7|$0F:$C2C7:85 09   	STA $09    
0x03C2D9|$0F:$C2C9:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03C2DC|$0F:$C2CC:60      	RTS        

; control flow target (from $E32C)
; external control flow target (from $07:$8A76, $09:$815D, $0A:$8134, $0B:$8084)
0x03C2DD|$0F:$C2CD:A0 00   	LDY #$00   
; control flow target (from $C2DC)
0x03C2DF|$0F:$C2CF:B1 0E   	LDA ($0E),Y
0x03C2E1|$0F:$C2D1:99 00 05	STA $0500,Y
0x03C2E4|$0F:$C2D4:B1 10   	LDA ($10),Y
0x03C2E6|$0F:$C2D6:99 0D 05	STA $050D,Y
0x03C2E9|$0F:$C2D9:C8      	INY        
0x03C2EA|$0F:$C2DA:C0 0D   	CPY #$0D   
0x03C2EC|$0F:$C2DC:D0 F1   	BNE $C2CF  
; external control flow target (from $06:$828A)
0x03C2EE|$0F:$C2DE:A9 30   	LDA #$30   
0x03C2F0|$0F:$C2E0:85 0C   	STA $0C    
0x03C2F2|$0F:$C2E2:A9 F0   	LDA #$F0   
0x03C2F4|$0F:$C2E4:4C 09
; external indexed data load target (from $06:$827F)
0x03C2F6|$0F:$C2E6:      C3	JMP $C309  


; code -> data
; indexed data load target (from $C242, $C2FB)
0x03C2F7|$0F:$C2E7:00
; indexed data load target (from $C247)
0x03C2F8|$0F:$C2E8:   05	; $0500
; external data load target (from $06:$A276)
0x03C2F9|$0F:$C2E9:0D
; external data load target (from $06:$A27B)
0x03C2FA|$0F:$C2EA:   05	; $050D

; data -> code
; control flow target (from $C42E)
; external control flow target (from $06:$8253, $0A:$8114)
0x03C2FB|$0F:$C2EB:A5 3C   	LDA $3C    
0x03C2FD|$0F:$C2ED:C9 30   	CMP #$30   
0x03C2FF|$0F:$C2EF:D0 08   	BNE $C2F9  
0x03C301|$0F:$C2F1:A9 00   	LDA #$00   
0x03C303|$0F:$C2F3:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
; call to code in a different bank ($00:$800F)
0x03C306|$0F:$C2F6:20 0F 80	JSR $800F  
; control flow target (from $C2EF)
0x03C309|$0F:$C2F9:A2 03   	LDX #$03   
; control flow target (from $C301)
0x03C30B|$0F:$C2FB:BD E7 C2	LDA $C2E7,X
0x03C30E|$0F:$C2FE:95 0E   	STA $0E,X  
0x03C310|$0F:$C300:CA      	DEX        
0x03C311|$0F:$C301:10 F8   	BPL $C2FB  
0x03C313|$0F:$C303:A9 00   	LDA #$00   
0x03C315|$0F:$C305:85 0C   	STA $0C    
0x03C317|$0F:$C307:A9 10   	LDA #$10   
; control flow target (from $C2E4)
0x03C319|$0F:$C309:48      	PHA        
0x03C31A|$0F:$C30A:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $C335)
0x03C31D|$0F:$C30D:A5 0E   	LDA $0E    
0x03C31F|$0F:$C30F:85 0A   	STA $0A    
0x03C321|$0F:$C311:A5 0F   	LDA $0F    
0x03C323|$0F:$C313:85 0B   	STA $0B    
0x03C325|$0F:$C315:20 24 C2	JSR $C224  
0x03C328|$0F:$C318:A5 0D   	LDA $0D    
0x03C32A|$0F:$C31A:F0 0B   	BEQ $C327  
0x03C32C|$0F:$C31C:A5 10   	LDA $10    
0x03C32E|$0F:$C31E:85 0A   	STA $0A    
0x03C330|$0F:$C320:A5 11   	LDA $11    
0x03C332|$0F:$C322:85 0B   	STA $0B    
0x03C334|$0F:$C324:20 28 C2	JSR $C228  
; control flow target (from $C31A)
0x03C337|$0F:$C327:A2 04   	LDX #$04   
0x03C339|$0F:$C329:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03C33C|$0F:$C32C:68      	PLA        
0x03C33D|$0F:$C32D:48      	PHA        
0x03C33E|$0F:$C32E:18      	CLC        
0x03C33F|$0F:$C32F:65 0C   	ADC $0C    
0x03C341|$0F:$C331:85 0C   	STA $0C    
0x03C343|$0F:$C333:C9 50   	CMP #$50   
0x03C345|$0F:$C335:90 D6   	BCC $C30D  
0x03C347|$0F:$C337:68      	PLA        
0x03C348|$0F:$C338:60      	RTS        

; 16-bit multiplication: ($10-$11) = ($0C-$0D) * ($0E-$0F); consumes $0C-$0F
; control flow target (from $D692, $E19F, $E472)
; external control flow target (from $02:$B03E, $06:$86B4, $0A:$8171)
0x03C349|$0F:$C339:A9 00   	LDA #$00   
0x03C34B|$0F:$C33B:85 10   	STA $10    
0x03C34D|$0F:$C33D:85 11   	STA $11    
; control flow target (from $C35C)
0x03C34F|$0F:$C33F:A5 0C   	LDA $0C    
0x03C351|$0F:$C341:05 0D   	ORA $0D    
0x03C353|$0F:$C343:F0 1A   	BEQ $C35F  
0x03C355|$0F:$C345:46 0D   	LSR $0D    
0x03C357|$0F:$C347:66 0C   	ROR $0C    
0x03C359|$0F:$C349:90 0D   	BCC $C358  
0x03C35B|$0F:$C34B:A5 0E   	LDA $0E    
0x03C35D|$0F:$C34D:18      	CLC        
0x03C35E|$0F:$C34E:65 10   	ADC $10    
0x03C360|$0F:$C350:85 10   	STA $10    
0x03C362|$0F:$C352:A5 0F   	LDA $0F    
0x03C364|$0F:$C354:65 11   	ADC $11    
0x03C366|$0F:$C356:85 11   	STA $11    
; control flow target (from $C349)
0x03C368|$0F:$C358:06 0E   	ASL $0E    
0x03C36A|$0F:$C35A:26 0F   	ROL $0F    
0x03C36C|$0F:$C35C:4C 3F C3	JMP $C33F  

; control flow target (from $C343)
0x03C36F|$0F:$C35F:60      	RTS        

; 16-bit division: ($0C-$0D) / ($0E-$0F) = quotient in ($0C-$0D), remainder in ($10-$11)
; external control flow target (from $02:$B063)
0x03C370|$0F:$C360:A0 10   	LDY #$10   	; 16 bit logic
0x03C372|$0F:$C362:A9 00   	LDA #$00   	; initialize remainder
0x03C374|$0F:$C364:85 10   	STA $10    
0x03C376|$0F:$C366:85 11   	STA $11    
; control flow target (from $C390)
0x03C378|$0F:$C368:06 0C   	ASL $0C    	; 16-bit ASL $0C-$0D into 16-bit $10-$11
0x03C37A|$0F:$C36A:26 0D   	ROL $0D    
0x03C37C|$0F:$C36C:26 10   	ROL $10    
0x03C37E|$0F:$C36E:26 11   	ROL $11    
0x03C380|$0F:$C370:E6 0C   	INC $0C    	; assume ($10-$11) >= ($0E-$0F), INC quotient and MOD remainder
0x03C382|$0F:$C372:A5 10   	LDA $10    
0x03C384|$0F:$C374:38      	SEC        
0x03C385|$0F:$C375:E5 0E   	SBC $0E    
0x03C387|$0F:$C377:85 10   	STA $10    
0x03C389|$0F:$C379:A5 11   	LDA $11    
0x03C38B|$0F:$C37B:E5 0F   	SBC $0F    
0x03C38D|$0F:$C37D:85 11   	STA $11    
0x03C38F|$0F:$C37F:B0 0E   	BCS $C38F  	; branch if assumption was correct; otherwise undo INC/MOD
0x03C391|$0F:$C381:A5 10   	LDA $10    
0x03C393|$0F:$C383:65 0E   	ADC $0E    
0x03C395|$0F:$C385:85 10   	STA $10    
0x03C397|$0F:$C387:A5 11   	LDA $11    
0x03C399|$0F:$C389:65 0F   	ADC $0F    
0x03C39B|$0F:$C38B:85 11   	STA $11    
0x03C39D|$0F:$C38D:C6 0C   	DEC $0C    
; control flow target (from $C37F)
0x03C39F|$0F:$C38F:88      	DEY        
0x03C3A0|$0F:$C390:D0 D6   	BNE $C368  	; if more bits to divide, divide them
0x03C3A2|$0F:$C392:60      	RTS        

; control flow target (from $DF71)
0x03C3A3|$0F:$C393:A0 08   	LDY #$08   
0x03C3A5|$0F:$C395:A9 00   	LDA #$00   
; control flow target (from $C3A6)
0x03C3A7|$0F:$C397:06 0C   	ASL $0C    
0x03C3A9|$0F:$C399:2A      	ROL        
0x03C3AA|$0F:$C39A:E6 0C   	INC $0C    
0x03C3AC|$0F:$C39C:38      	SEC        
0x03C3AD|$0F:$C39D:E5 0E   	SBC $0E    
0x03C3AF|$0F:$C39F:B0 04   	BCS $C3A5  
0x03C3B1|$0F:$C3A1:65 0E   	ADC $0E    
0x03C3B3|$0F:$C3A3:C6 0C   	DEC $0C    
; control flow target (from $C39F)
0x03C3B5|$0F:$C3A5:88      	DEY        
0x03C3B6|$0F:$C3A6:D0 EF   	BNE $C397  
0x03C3B8|$0F:$C3A8:85 10   	STA $10    
0x03C3BA|$0F:$C3AA:60      	RTS        

; generate a random number and store it in $32-$33 (two passes)
; control flow target (from $C490, $D685, $D99C)
; external control flow target (from $04:$802D, $04:$80DC, $04:$824F, $04:$97CC, $04:$9880, $04:$A005, $04:$A044, $04:$AEDF, $04:$B078, $04:$B6C1, $04:$B793, $06:$846C, $06:$8744, $06:$8847, $06:$921E, $06:$9B5D, $06:$9BBE, $06:$9C41, $06:$BC6B, $06:$BCE8, $06:$BCF4, $06:$BD0E, $09:$9E5E)
0x03C3BB|$0F:$C3AB:A9 FF   	LDA #$FF   
0x03C3BD|$0F:$C3AD:85 0C   	STA $0C    
0x03C3BF|$0F:$C3AF:20 B6 C3	JSR $C3B6  	; generate a random number and store it in $32-$33 (one pass)
0x03C3C2|$0F:$C3B2:A9 FF   	LDA #$FF   
0x03C3C4|$0F:$C3B4:85 0C   	STA $0C    
; generate a random number and store it in $32-$33 (one pass)
; control flow target (from $C3AF)
; external control flow target (from $06:$ACC6)
0x03C3C6|$0F:$C3B6:A0 08   	LDY #$08   
; control flow target (from $C3D2)
0x03C3C8|$0F:$C3B8:A5 33   	LDA $33    	; RNG byte 1
0x03C3CA|$0F:$C3BA:45 0C   	EOR $0C    
0x03C3CC|$0F:$C3BC:06 32   	ASL $32    	; RNG byte 0
0x03C3CE|$0F:$C3BE:26 33   	ROL $33    	; RNG byte 1
0x03C3D0|$0F:$C3C0:06 0C   	ASL $0C    
0x03C3D2|$0F:$C3C2:0A      	ASL        
0x03C3D3|$0F:$C3C3:90 0C   	BCC $C3D1  
0x03C3D5|$0F:$C3C5:A5 32   	LDA $32    	; RNG byte 0
0x03C3D7|$0F:$C3C7:49 21   	EOR #$21   
0x03C3D9|$0F:$C3C9:85 32   	STA $32    	; RNG byte 0
0x03C3DB|$0F:$C3CB:A5 33   	LDA $33    	; RNG byte 1
0x03C3DD|$0F:$C3CD:49 10   	EOR #$10   
0x03C3DF|$0F:$C3CF:85 33   	STA $33    	; RNG byte 1
; control flow target (from $C3C3)
0x03C3E1|$0F:$C3D1:88      	DEY        
0x03C3E2|$0F:$C3D2:D0 E4   	BNE $C3B8  
0x03C3E4|$0F:$C3D4:60      	RTS        

; save A to $05F6, X to $43, and load bank specified by A
; control flow target (from $C2F3, $C3DC, $C4E8, $C4FA, $C506, $C50E, $C544, $C55E, $C569, $C574, $C57F, $C58A, $C688, $C690, $CCEE, $CFA2, $D09B, $D0E7, $D2FF, $D31C, $D34A, $F782, $F86D, $FCFA)
; external control flow target (from $02:$B205, $06:$BC85)
0x03C3E5|$0F:$C3D5:4C BB FF	JMP $FFBB  	; save A to $05F6, X to $43, and load bank specified by A

; CLI and load bank specified by A
; control flow target (from $C0C8, $C0D1)
0x03C3E8|$0F:$C3D8:58      	CLI        
0x03C3E9|$0F:$C3D9:4C C0 FF	JMP $FFC0  	; load bank specified by A

; load bank specified by A, wait for interrupt, set $6007 to #$FF, turn screen off, copy ($0C) inclusive - ($0E) exclusive to PPU at ($10), wait for interrupt, turn screen sprites and backround on
; external control flow target (from $00:$8039, $00:$80FF)
0x03C3EC|$0F:$C3DC:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03C3EF|$0F:$C3DF:20 E8 C3	JSR $C3E8  	; wait for interrupt, set $6007 to #$FF, turn screen off
0x03C3F2|$0F:$C3E2:20 F6 C3	JSR $C3F6  	; copy ($0C) inclusive - ($0E) exclusive to PPU at ($10)
0x03C3F5|$0F:$C3E5:4C 1C C4	JMP $C41C  	; wait for interrupt, turn screen sprites and backround on

; wait for interrupt, set $6007 to #$FF, turn screen off
; control flow target (from $C3DF, $C446)
; external control flow target (from $00:$803F, $00:$807E, $00:$823A, $04:$8715, $08:$801B, $0A:$8010, $0A:$80BC, $0A:$81E2, $0B:$8087)
0x03C3F8|$0F:$C3E8:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03C3FB|$0F:$C3EB:A9 FF   	LDA #$FF   
0x03C3FD|$0F:$C3ED:8D 07 60	STA $6007  
0x03C400|$0F:$C3F0:A9 00   	LDA #$00   	; screen off
0x03C402|$0F:$C3F2:8D 01 20	STA $2001  	; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display)
0x03C405|$0F:$C3F5:60      	RTS        

; copy ($0C) inclusive - ($0E) exclusive to PPU at ($10)
; control flow target (from $C3E2)
; external control flow target (from $00:$8081, $00:$80C0, $00:$8396, $04:$8A84, $0A:$81E5, $0B:$808A)
0x03C406|$0F:$C3F6:A5 11   	LDA $11    	; PPU address high byte; PPU address low byte
0x03C408|$0F:$C3F8:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C40B|$0F:$C3FB:A5 10   	LDA $10    
0x03C40D|$0F:$C3FD:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C410|$0F:$C400:A0 00   	LDY #$00   
; control flow target (from $C416, $C41A)
0x03C412|$0F:$C402:B1 0C   	LDA ($0C),Y	; CHR data
0x03C414|$0F:$C404:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C417|$0F:$C407:A5 0C   	LDA $0C    
0x03C419|$0F:$C409:C5 0E   	CMP $0E    	; CHR end address low byte (exclusive)
0x03C41B|$0F:$C40B:D0 07   	BNE $C414  	; update $0C-$0D
0x03C41D|$0F:$C40D:A5 0D   	LDA $0D    
0x03C41F|$0F:$C40F:C5 0F   	CMP $0F    	; CHR end address high byte (exclusive)
0x03C421|$0F:$C411:D0 01   	BNE $C414  	; update $0C-$0D
0x03C423|$0F:$C413:60      	RTS        

; update $0C-$0D
; control flow target (from $C40B, $C411)
0x03C424|$0F:$C414:E6 0C   	INC $0C    
0x03C426|$0F:$C416:D0 EA   	BNE $C402  
0x03C428|$0F:$C418:E6 0D   	INC $0D    
0x03C42A|$0F:$C41A:D0 E6   	BNE $C402  
; wait for interrupt, turn screen sprites and backround on
; control flow target (from $C3E5, $C462)
; external control flow target (from $00:$8078, $00:$80E2, $00:$8325, $04:$8730, $06:$A98C)
0x03C42C|$0F:$C41C:A9 00   	LDA #$00   	; useless op
0x03C42E|$0F:$C41E:8D 07 60	STA $6007  	; useless op
0x03C431|$0F:$C421:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03C434|$0F:$C424:A9 18   	LDA #$18   	; turn sprites and backround on
0x03C436|$0F:$C426:8D 01 20	STA $2001  	; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display)
0x03C439|$0F:$C429:60      	RTS        

; control flow target (from $C52D, $C6F3, $C97B, $D2B6, $D2DE, $E27E, $E287)
; external control flow target (from $04:$870F, $06:$A97E, $07:$81BD, $07:$81D6, $07:$84DD, $07:$851F, $07:$853B, $07:$85F6, $07:$88FF, $08:$8018, $09:$8005, $0A:$800D)
0x03C43A|$0F:$C42A:A9 FF   	LDA #$FF   
0x03C43C|$0F:$C42C:85 0D   	STA $0D    
0x03C43E|$0F:$C42E:20 EB C2	JSR $C2EB  
0x03C441|$0F:$C431:A2 00   	LDX #$00   
0x03C443|$0F:$C433:8A      	TXA        
; control flow target (from $C438)
0x03C444|$0F:$C434:9D 00 04	STA $0400,X	; menu-based palette overrides start
0x03C447|$0F:$C437:E8      	INX        
0x03C448|$0F:$C438:D0 FA   	BNE $C434  
0x03C44A|$0F:$C43A:A2 C0   	LDX #$C0   
; control flow target (from $C443)
0x03C44C|$0F:$C43C:9D 00 03	STA $0300,X	; PPU write buffer start
0x03C44F|$0F:$C43F:9D 00 07	STA $0700,X
0x03C452|$0F:$C442:E8      	INX        
0x03C453|$0F:$C443:D0 F7   	BNE $C43C  
0x03C455|$0F:$C445:60      	RTS        

; turn screen off, write $800 [space] tiles to PPU $2000, turn screen on
; control flow target (from $C533, $D2E1)
; external control flow target (from $04:$870C, $06:$A981, $07:$81C0, $07:$8902, $08:$801E, $09:$8008)
0x03C456|$0F:$C446:20 E8 C3	JSR $C3E8  	; wait for interrupt, set $6007 to #$FF, turn screen off
0x03C459|$0F:$C449:A9 20   	LDA #$20   
0x03C45B|$0F:$C44B:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C45E|$0F:$C44E:A9 00   	LDA #$00   
0x03C460|$0F:$C450:8D 06 20	STA $2006  	; VRAM Address Register #2 (write twice; $2007 address)
0x03C463|$0F:$C453:A9 5F   	LDA #$5F   
0x03C465|$0F:$C455:A2 08   	LDX #$08   
; control flow target (from $C460)
0x03C467|$0F:$C457:A0 00   	LDY #$00   
; control flow target (from $C45D)
0x03C469|$0F:$C459:8D 07 20	STA $2007  	; VRAM I/O Register
0x03C46C|$0F:$C45C:88      	DEY        
0x03C46D|$0F:$C45D:D0 FA   	BNE $C459  
0x03C46F|$0F:$C45F:CA      	DEX        
0x03C470|$0F:$C460:D0 F5   	BNE $C457  
0x03C472|$0F:$C462:4C 1C C4	JMP $C41C  	; wait for interrupt, turn screen sprites and backround on

; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0
; control flow target (from $C530, $D2E4, $E281, $E28A)
; external control flow target (from $04:$86FE, $07:$8905, $09:$800B, $0A:$805C)
0x03C475|$0F:$C465:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; set every 4th byte of $0200 - $02FC to #$F0
; control flow target (from $C67A, $D8E0)
; external control flow target (from $07:$81BA, $08:$8021, $0A:$8013)
0x03C478|$0F:$C468:A2 00   	LDX #$00   
0x03C47A|$0F:$C46A:A9 F0   	LDA #$F0   
; control flow target (from $C473)
0x03C47C|$0F:$C46C:9D 00 02	STA $0200,X	; sprite buffer start
0x03C47F|$0F:$C46F:E8      	INX        
0x03C480|$0F:$C470:E8      	INX        
0x03C481|$0F:$C471:E8      	INX        
0x03C482|$0F:$C472:E8      	INX        
0x03C483|$0F:$C473:D0 F7   	BNE $C46C  
0x03C485|$0F:$C475:60      	RTS        

; read joypad 1 data into $2F
; control flow target (from $C704, $D140)
; external control flow target (from $02:$B71A, $04:$9A4D, $06:$8930, $06:$A976, $06:$AFAE, $06:$BC5D, $06:$BC74, $06:$BC7B, $08:$8299, $08:$8335, $0A:$804C)
0x03C486|$0F:$C476:A9 01   	LDA #$01   
0x03C488|$0F:$C478:8D 16 40	STA $4016  	; Joypad #1 (READ: #$10: Zapper Trigger Not Pulled, #$08: Zapper Sprite Detection, #$01: Joypad Data; WRITE: #$01: Reset Joypad Strobe, set Expansion Port Method to Read)
0x03C48B|$0F:$C47B:A9 00   	LDA #$00   
0x03C48D|$0F:$C47D:8D 16 40	STA $4016  	; Joypad #1 (READ: #$10: Zapper Trigger Not Pulled, #$08: Zapper Sprite Detection, #$01: Joypad Data; WRITE: #$01: Reset Joypad Strobe, set Expansion Port Method to Read)
0x03C490|$0F:$C480:A0 08   	LDY #$08   	; 8 bits of data to read
; control flow target (from $C48C)
0x03C492|$0F:$C482:AD 16 40	LDA $4016  	; Joypad #1 (READ: #$10: Zapper Trigger Not Pulled, #$08: Zapper Sprite Detection, #$01: Joypad Data; WRITE: #$01: Reset Joypad Strobe, set Expansion Port Method to Read)
0x03C495|$0F:$C485:29 03   	AND #$03   	; mask off the non-joypad data (should be AND #$01?)
0x03C497|$0F:$C487:C9 01   	CMP #$01   	; set C to low bit of joypad data
0x03C499|$0F:$C489:66 2F   	ROR $2F    	; joypad 1 data
0x03C49B|$0F:$C48B:88      	DEY        
0x03C49C|$0F:$C48C:D0 F4   	BNE $C482  	; loop until all 8 bits read
0x03C49E|$0F:$C48E:A6 0C   	LDX $0C    	; save value of $0C in X
0x03C4A0|$0F:$C490:20 AB C3	JSR $C3AB  	; generate a random number and store it in $32-$33 (two passes)
0x03C4A3|$0F:$C493:86 0C   	STX $0C    	; restore value of $0C from X
0x03C4A5|$0F:$C495:60      	RTS        

; given a hero ID in $9C and an item ID in A, SEC if hero has that item, CLC otherwise
; control flow target (from $C4B0, $C4B6)
0x03C4A6|$0F:$C496:86 CB   	STX $CB    	; save X for later
0x03C4A8|$0F:$C498:85 9B   	STA $9B    	; item ID
0x03C4AA|$0F:$C49A:A5 9C   	LDA $9C    	; hero ID
0x03C4AC|$0F:$C49C:0A      	ASL        	; 8 inventory slots per hero
0x03C4AD|$0F:$C49D:0A      	ASL        
0x03C4AE|$0F:$C49E:0A      	ASL        
0x03C4AF|$0F:$C49F:AA      	TAX        
0x03C4B0|$0F:$C4A0:A0 08   	LDY #$08   	; 8 inventory slots per hero
; control flow target (from $C4AC)
0x03C4B2|$0F:$C4A2:BD 00 06	LDA $0600,X	; Midenhall inventory item 1 (| #$40 if equipped)
0x03C4B5|$0F:$C4A5:C5 9B   	CMP $9B    	; item ID
0x03C4B7|$0F:$C4A7:38      	SEC        
0x03C4B8|$0F:$C4A8:F0 05   	BEQ $C4AF  	; if found, RTS
0x03C4BA|$0F:$C4AA:E8      	INX        
0x03C4BB|$0F:$C4AB:88      	DEY        
0x03C4BC|$0F:$C4AC:D0 F4   	BNE $C4A2  	; if more inventory to check, check it
0x03C4BE|$0F:$C4AE:18      	CLC        	; if we get here, then hero does not posses item $9B
; control flow target (from $C4A8)
0x03C4BF|$0F:$C4AF:60      	RTS        

; given a hero ID in $9C and an item ID in A, SEC if hero has that item, CLC otherwise
; external control flow target (from $04:$A4ED, $04:$A9E4, $04:$AFCF, $04:$AFE3, $04:$AFEC, $04:$B3D1, $06:$8DC0, $06:$A1C1)
0x03C4C0|$0F:$C4B0:20 96 C4	JSR $C496  	; given a hero ID in $9C and an item ID in A, SEC if hero has that item, CLC otherwise
0x03C4C3|$0F:$C4B3:A6 CB   	LDX $CB    	; restore the original value of X
0x03C4C5|$0F:$C4B5:60      	RTS        

; given a hero ID in $9C and an item ID in A, remove that item from hero's inventory if present and SEC, CLC otherwise
; external control flow target (from $06:$8DC9, $06:$92CF, $06:$92DE, $06:$97A7)
0x03C4C6|$0F:$C4B6:20 96 C4	JSR $C496  	; given a hero ID in $9C and an item ID in A, SEC if hero has that item, CLC otherwise
0x03C4C9|$0F:$C4B9:B0 03   	BCS $C4BE  	; given a party inventory offset in X and a number of items to be moved up in Y, move that many inventory items up
0x03C4CB|$0F:$C4BB:A6 CB   	LDX $CB    	; restore the original value of X
0x03C4CD|$0F:$C4BD:60      	RTS        

; given a party inventory offset in X and a number of items to be moved up in Y, move that many inventory items up
; control flow target (from $C4B9, $C4C8, $C4E3)
0x03C4CE|$0F:$C4BE:88      	DEY        	; number of items to move up
0x03C4CF|$0F:$C4BF:F0 0A   	BEQ $C4CB  	; if zero, then done moving items up
; copy item N+1 to item N
0x03C4D1|$0F:$C4C1:BD 01 06	LDA $0601,X	; Midenhall inventory item 2 (| #$40 if equipped)
0x03C4D4|$0F:$C4C4:9D 00 06	STA $0600,X	; Midenhall inventory item 1 (| #$40 if equipped)
0x03C4D7|$0F:$C4C7:E8      	INX        
0x03C4D8|$0F:$C4C8:4C BE C4	JMP $C4BE  	; given a party inventory offset in X and a number of items to be moved up in Y, move that many inventory items up

; control flow target (from $C4BF)
0x03C4DB|$0F:$C4CB:A9 00   	LDA #$00   	; set the final inventory slot to #$00 (no item)
0x03C4DD|$0F:$C4CD:9D 00 06	STA $0600,X	; Midenhall inventory item 1 (| #$40 if equipped)
0x03C4E0|$0F:$C4D0:A6 CB   	LDX $CB    	; restore the original value of X
0x03C4E2|$0F:$C4D2:38      	SEC        
0x03C4E3|$0F:$C4D3:60      	RTS        

; given hero ID in A and hero inventory offset in X, remove that item from hero's inventory and move all lower items up 1 slot
; external control flow target (from $04:$A4F6, $06:$853D, $06:$95FC, $06:$9621, $06:$9706, $06:$9A1C, $06:$9AB7)
0x03C4E4|$0F:$C4D4:86 CB   	STX $CB    
0x03C4E6|$0F:$C4D6:0A      	ASL        
0x03C4E7|$0F:$C4D7:0A      	ASL        
0x03C4E8|$0F:$C4D8:0A      	ASL        
0x03C4E9|$0F:$C4D9:18      	CLC        
0x03C4EA|$0F:$C4DA:65 CB   	ADC $CB    
0x03C4EC|$0F:$C4DC:AA      	TAX        	; X = A * 8 + X, i.e. convert hero inventory offset to party inventory offset
0x03C4ED|$0F:$C4DD:A9 08   	LDA #$08   
0x03C4EF|$0F:$C4DF:38      	SEC        
0x03C4F0|$0F:$C4E0:E5 CB   	SBC $CB    
0x03C4F2|$0F:$C4E2:A8      	TAY        	; Y = number of items to bubble up
0x03C4F3|$0F:$C4E3:4C BE C4	JMP $C4BE  	; given a party inventory offset in X and a number of items to be moved up in Y, move that many inventory items up

; return 1 byte from bank 1's ($00,Y) in A, INC 16-bit $00,Y-$01,Y
; external control flow target (from $04:$8F9F)
0x03C4F6|$0F:$C4E6:A9 01   	LDA #$01   
0x03C4F8|$0F:$C4E8:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03C4FB|$0F:$C4EB:98      	TYA        
0x03C4FC|$0F:$C4EC:AA      	TAX        
0x03C4FD|$0F:$C4ED:A1 00   	LDA ($00,X)
0x03C4FF|$0F:$C4EF:F6 00   	INC $00,X  
0x03C501|$0F:$C4F1:D0 02   	BNE $C4F5  
0x03C503|$0F:$C4F3:F6 01   	INC $01,X  
; control flow target (from $C4F1)
0x03C505|$0F:$C4F5:48      	PHA        
0x03C506|$0F:$C4F6:A6 43   	LDX $43    
0x03C508|$0F:$C4F8:A9 04   	LDA #$04   
0x03C50A|$0F:$C4FA:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03C50D|$0F:$C4FD:68      	PLA        
0x03C50E|$0F:$C4FE:60      	RTS        

; external control flow target (from $00:$B798, $00:$B7B0)
0x03C50F|$0F:$C4FF:90 03   	BCC $C504  
0x03C511|$0F:$C501:20 11 C5	JSR $C511  	; flash screen 5 times
; control flow target (from $C4FF, $D328, $FF66)
0x03C514|$0F:$C504:A9 04   	LDA #$04   
0x03C516|$0F:$C506:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
; call to code in a different bank ($04:$8015)
0x03C519|$0F:$C509:20 15 80	JSR $8015  
0x03C51C|$0F:$C50C:A9 00   	LDA #$00   
0x03C51E|$0F:$C50E:4C D5 C3	JMP $C3D5  	; save A to $05F6, X to $43, and load bank specified by A

; flash screen 5 times
; control flow target (from $C501)
; external control flow target (from $06:$BD17, $06:$BD81, $06:$BD8E, $07:$84F9, $07:$8687)
0x03C521|$0F:$C511:A2 05   	LDX #$05   
0x03C523|$0F:$C513:D0 02   	BNE $C517  
; flash screen 10 times
; external control flow target (from $04:$86ED, $04:$9CA0, $06:$85AF, $06:$8606, $06:$8BC6, $06:$9172, $06:$940B, $06:$9519, $06:$96C3, $06:$9944, $06:$9947, $06:$BD3B, $06:$BD3E, $07:$8625)
0x03C525|$0F:$C515:A2 0A   	LDX #$0A   
; control flow target (from $C513, $C52A)
0x03C527|$0F:$C517:8A      	TXA        	; save X on the stack
0x03C528|$0F:$C518:48      	PHA        
0x03C529|$0F:$C519:29 01   	AND #$01   	; pick out the even/odd bit
0x03C52B|$0F:$C51B:49 19   	EOR #$19   	; enable sprites and background, toggle monochrome
0x03C52D|$0F:$C51D:48      	PHA        	; new PPU setting
0x03C52E|$0F:$C51E:A2 03   	LDX #$03   
0x03C530|$0F:$C520:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03C533|$0F:$C523:68      	PLA        	; new PPU setting
0x03C534|$0F:$C524:8D 01 20	STA $2001  	; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display)
0x03C537|$0F:$C527:68      	PLA        	; restore X from the stack
0x03C538|$0F:$C528:AA      	TAX        
0x03C539|$0F:$C529:CA      	DEX        
0x03C53A|$0F:$C52A:D0 EB   	BNE $C517  	; loop until no more flashes left
0x03C53C|$0F:$C52C:60      	RTS        

; external control flow target (from $09:$8027)
0x03C53D|$0F:$C52D:20 2A C4	JSR $C42A  
0x03C540|$0F:$C530:20 65 C4	JSR $C465  	; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0
0x03C543|$0F:$C533:20 46 C4	JSR $C446  	; turn screen off, write $800 [space] tiles to PPU $2000, turn screen on
0x03C546|$0F:$C536:A9 8F   	LDA #$8F   
0x03C548|$0F:$C538:85 30   	STA $30    
0x03C54A|$0F:$C53A:A9 00   	LDA #$00   
0x03C54C|$0F:$C53C:85 05   	STA $05    
0x03C54E|$0F:$C53E:85 06   	STA $06    
0x03C550|$0F:$C540:85 04   	STA $04    
0x03C552|$0F:$C542:A9 00   	LDA #$00   
0x03C554|$0F:$C544:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03C557|$0F:$C547:A9 06   	LDA #$06   
0x03C559|$0F:$C549:85 0C   	STA $0C    
; call to code in a different bank ($00:$8000)
0x03C55B|$0F:$C54B:20 00 80	JSR $8000  
0x03C55E|$0F:$C54E:A9 0E   	LDA #$0E   
0x03C560|$0F:$C550:85 0C   	STA $0C    
; call to code in a different bank ($00:$8000)
0x03C562|$0F:$C552:20 00 80	JSR $8000  
0x03C565|$0F:$C555:A9 0F   	LDA #$0F   
0x03C567|$0F:$C557:85 0C   	STA $0C    
; call to code in a different bank ($00:$8000)
0x03C569|$0F:$C559:20 00 80	JSR $8000  
0x03C56C|$0F:$C55C:A9 09   	LDA #$09   
0x03C56E|$0F:$C55E:4C D5 C3	JMP $C3D5  	; save A to $05F6, X to $43, and load bank specified by A

; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
; control flow target (from $C58D, $C5A0, $CAD2, $CFF6, $D03D, $D0D2, $D21A, $D22E, $D4E8, $D4FE, $D53E, $D6E3, $E383, $F693, $F69C, $FD82)
; external control flow target (from $00:$B793, $00:$B7AB, $00:$B8ED, $02:$B728, $04:$86FB, $04:$8AD5, $04:$8AEA, $04:$8FE4, $04:$959A, $04:$969E, $04:$973F, $04:$980B, $04:$98FA, $04:$9B61, $04:$9B71, $04:$9C84, $04:$9C9D, $04:$9CB4, $06:$81AC, $06:$882F, $06:$89F7, $06:$8BC3, $06:$8C5A, $06:$97C6, $06:$A18C, $06:$A254, $06:$A298, $06:$A2BC, $06:$B0D3, $06:$BC17, $06:$BD08, $06:$BD27, $06:$BD6E, $06:$BD7E, $06:$BD8B, $07:$8207, $07:$8218, $07:$83F1, $07:$84DA, $07:$8512, $07:$8538, $07:$85F3, $07:$8605, $07:$8613, $07:$8618, $07:$861D, $07:$8622, $07:$862B, $07:$8635, $07:$8684, $07:$868F, $08:$81E7, $08:$81F6, $08:$820E)
0x03C571|$0F:$C561:78      	SEI        
0x03C572|$0F:$C562:AA      	TAX        
0x03C573|$0F:$C563:AD F6 05	LDA $05F6  	; current bank
0x03C576|$0F:$C566:48      	PHA        	; save current bank on the stack
0x03C577|$0F:$C567:A9 03   	LDA #$03   
0x03C579|$0F:$C569:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03C57C|$0F:$C56C:8A      	TXA        
; call to code in a different bank ($03:$8003)
0x03C57D|$0F:$C56D:20 03 80	JSR $8003  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03C580|$0F:$C570:68      	PLA        	; restore current bank from stack
0x03C581|$0F:$C571:8D F6 05	STA $05F6  	; current bank
0x03C584|$0F:$C574:4C D5 C3	JMP $C3D5  	; save A to $05F6, X to $43, and load bank specified by A

; set $6144 to #$05
; external control flow target (from $06:$AA60, $07:$81C6, $07:$81FF, $07:$83E9, $07:$84E0, $08:$8015)
0x03C587|$0F:$C577:78      	SEI        
0x03C588|$0F:$C578:AA      	TAX        
0x03C589|$0F:$C579:AD F6 05	LDA $05F6  	; current bank
0x03C58C|$0F:$C57C:48      	PHA        
0x03C58D|$0F:$C57D:A9 03   	LDA #$03   
0x03C58F|$0F:$C57F:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03C592|$0F:$C582:8A      	TXA        
; call to code in a different bank ($03:$8009)
0x03C593|$0F:$C583:20 09 80	JSR $8009  
0x03C596|$0F:$C586:68      	PLA        
0x03C597|$0F:$C587:8D F6 05	STA $05F6  	; current bank
0x03C59A|$0F:$C58A:4C D5 C3	JMP $C3D5  	; save A to $05F6, X to $43, and load bank specified by A

; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]), wait for it to finish, then play previous BGM
; external control flow target (from $06:$8111, $06:$8258, $06:$8656, $06:$8735, $06:$8A4F, $06:$9742, $06:$998A, $06:$A956)
0x03C59D|$0F:$C58D:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03C5A0|$0F:$C590:A2 03   	LDX #$03   
0x03C5A2|$0F:$C592:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
; control flow target (from $C59B)
; external control flow target (from $04:$975B, $04:$9902)
0x03C5A5|$0F:$C595:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03C5A8|$0F:$C598:AD 56 01	LDA $0156  	; probably music playing flag? set to #$00 when music finishes
0x03C5AB|$0F:$C59B:D0 F8   	BNE $C595  
; control flow target (from $C5A8)
; external control flow target (from $06:$A2F5)
0x03C5AD|$0F:$C59D:AD F7 05	LDA $05F7  	; probably BGM for current area
0x03C5B0|$0F:$C5A0:4C 61 C5	JMP $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])

; external control flow target (from $04:$968F, $04:$9731)
0x03C5B3|$0F:$C5A3:A2 3C   	LDX #$3C   
0x03C5B5|$0F:$C5A5:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03C5B8|$0F:$C5A8:4C 9D C5	JMP $C59D  

; IRQ/BRK vector handler
; indirect control flow target (via $FFFE)
0x03C5BB|$0F:$C5AB:2C 15 40	BIT $4015  	; READ: pAPU Sound/Vertical Clock Signal Register (#$40: Vertical Clock Signal IRQ Availability, #$10: Delta Modulation, #$08: Noise, #$04: Triangle, #$02: Pulse #2, #$01: Pulse #1), WRITE: pAPU Channel Control (#$10: Delta Modulation, #$08: Noise, #$04: Triangle, #$02: Pulse #2, #$01: Pulse #1)
0x03C5BE|$0F:$C5AE:40      	RTI        

; reset vector handler
; control flow target (from $FFDB)
0x03C5BF|$0F:$C5AF:D8      	CLD        
; control flow target (from $C5B3)
0x03C5C0|$0F:$C5B0:AD 02 20	LDA $2002  	; PPU Status Register (#$80: In VBlank, #$40: Sprite #0 Hit, #$20: Scanline Sprite Count > 8, #$10: Ignore VRAM Writes); after read, #$80 and $2005-$2006 are reset
0x03C5C3|$0F:$C5B3:10 FB   	BPL $C5B0  	; wait for VBlank
; control flow target (from $C5B8)
0x03C5C5|$0F:$C5B5:AD 02 20	LDA $2002  	; PPU Status Register (#$80: In VBlank, #$40: Sprite #0 Hit, #$20: Scanline Sprite Count > 8, #$10: Ignore VRAM Writes); after read, #$80 and $2005-$2006 are reset
0x03C5C8|$0F:$C5B8:10 FB   	BPL $C5B5  	; wait for VBlank again
0x03C5CA|$0F:$C5BA:A9 08   	LDA #$08   
0x03C5CC|$0F:$C5BC:8D 00 20	STA $2000  	; PPU Control Register #1 (#$80: Execute NMI on VBlank, #$40: unused, #$20: Sprite Size [8x8/8x16], #$10: Background Pattern Table Address [$0000/$1000], #$08: Sprite Pattern Table Address [$0000/$1000], #$04: PPU Address Increment [1/32], #$03: Name Table Address [$2000/$2400/$2800/$2C00])
0x03C5CF|$0F:$C5BF:A9 00   	LDA #$00   
0x03C5D1|$0F:$C5C1:8D 01 20	STA $2001  	; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display)
0x03C5D4|$0F:$C5C4:8D FF FF	STA $FFFF  	; swap in bank 0
0x03C5D7|$0F:$C5C7:8D FF FF	STA $FFFF  
0x03C5DA|$0F:$C5CA:8D FF FF	STA $FFFF  
0x03C5DD|$0F:$C5CD:8D FF FF	STA $FFFF  
0x03C5E0|$0F:$C5D0:8D FF FF	STA $FFFF  
0x03C5E3|$0F:$C5D3:8D 45 61	STA $6145  
0x03C5E6|$0F:$C5D6:8D 46 61	STA $6146  
0x03C5E9|$0F:$C5D9:A9 88   	LDA #$88   
0x03C5EB|$0F:$C5DB:8D AE 61	STA $61AE  
0x03C5EE|$0F:$C5DE:A9 89   	LDA #$89   
0x03C5F0|$0F:$C5E0:8D AF 61	STA $61AF  
0x03C5F3|$0F:$C5E3:A2 FF   	LDX #$FF   	; reset stack pointer
0x03C5F5|$0F:$C5E5:9A      	TXS        
0x03C5F6|$0F:$C5E6:A0 00   	LDY #$00   
0x03C5F8|$0F:$C5E8:84 00   	STY $00    
0x03C5FA|$0F:$C5EA:84 01   	STY $01    
0x03C5FC|$0F:$C5EC:98      	TYA        
; control flow target (from $C5F9)
0x03C5FD|$0F:$C5ED:91 00   	STA ($00),Y	; reset all $800 of system RAM to #$00
0x03C5FF|$0F:$C5EF:E6 00   	INC $00    
0x03C601|$0F:$C5F1:D0 02   	BNE $C5F5  
0x03C603|$0F:$C5F3:E6 01   	INC $01    
; control flow target (from $C5F1)
0x03C605|$0F:$C5F5:A6 01   	LDX $01    
0x03C607|$0F:$C5F7:E0 08   	CPX #$08   
0x03C609|$0F:$C5F9:D0 F2   	BNE $C5ED  
0x03C60B|$0F:$C5FB:A9 0E   	LDA #$0E   	; 8kb CHR, 16kb+fixed-last PRG, vertical mirroring
0x03C60D|$0F:$C5FD:8D 92 01	STA $0192  	; MMC1 control mode (#$10 = CHR mode [1 8k block/2 4k blocks], #$0C = PRG mode [32kb/32kb/fixed-first+16kb/16kb+fixed-last], #$03 = Mirroring [1 low/1 high/vertical/horizontal])
0x03C610|$0F:$C600:A9 00   	LDA #$00   	; CHR bank 0
0x03C612|$0F:$C602:8D 93 01	STA $0193  	; CHR bank 0
0x03C615|$0F:$C605:20 0B C6	JSR $C60B  	; initialize MMC control mode and CHR banks
0x03C618|$0F:$C608:4C 61 C6	JMP $C661  

; initialize MMC control mode and CHR banks
; control flow target (from $C0C3, $C605)
0x03C61B|$0F:$C60B:EE DE FF	INC $FFDE  	; #$80; used to reset MMC1 shift register and switch to last-fixed-bank mode
0x03C61E|$0F:$C60E:AD 92 01	LDA $0192  	; MMC1 control mode (#$10 = CHR mode [1 8k block/2 4k blocks], #$0C = PRG mode [32kb/32kb/fixed-first+16kb/16kb+fixed-last], #$03 = Mirroring [1 low/1 high/vertical/horizontal])
0x03C621|$0F:$C611:20 1F C6	JSR $C61F  	; set MMC control mode based on A
0x03C624|$0F:$C614:AD 93 01	LDA $0193  	; CHR bank 0
0x03C627|$0F:$C617:20 36 C6	JSR $C636  	; set CHR bank 0 based on A
0x03C62A|$0F:$C61A:A9 00   	LDA #$00   
0x03C62C|$0F:$C61C:4C 4D C6	JMP $C64D  	; set CHR bank 1 based on A

; set MMC control mode based on A
; control flow target (from $C611)
; external control flow target (from $07:$8917, $07:$89C2, $09:$801A)
0x03C62F|$0F:$C61F:8D 92 01	STA $0192  	; MMC1 control mode (#$10 = CHR mode [1 8k block/2 4k blocks], #$0C = PRG mode [32kb/32kb/fixed-first+16kb/16kb+fixed-last], #$03 = Mirroring [1 low/1 high/vertical/horizontal])
0x03C632|$0F:$C622:8D FF 9F	STA $9FFF  
0x03C635|$0F:$C625:4A      	LSR        
0x03C636|$0F:$C626:8D FF 9F	STA $9FFF  
0x03C639|$0F:$C629:4A      	LSR        
0x03C63A|$0F:$C62A:8D FF 9F	STA $9FFF  
0x03C63D|$0F:$C62D:4A      	LSR        
0x03C63E|$0F:$C62E:8D FF 9F	STA $9FFF  
0x03C641|$0F:$C631:4A      	LSR        
0x03C642|$0F:$C632:8D FF 9F	STA $9FFF  
0x03C645|$0F:$C635:60      	RTS        

; set CHR bank 0 based on A
; control flow target (from $C617, $D19B)
0x03C646|$0F:$C636:8D 93 01	STA $0193  	; CHR bank 0
0x03C649|$0F:$C639:8D FF BF	STA $BFFF  
0x03C64C|$0F:$C63C:4A      	LSR        
0x03C64D|$0F:$C63D:8D FF BF	STA $BFFF  
0x03C650|$0F:$C640:4A      	LSR        
0x03C651|$0F:$C641:8D FF BF	STA $BFFF  
0x03C654|$0F:$C644:4A      	LSR        
0x03C655|$0F:$C645:8D FF BF	STA $BFFF  
0x03C658|$0F:$C648:4A      	LSR        
0x03C659|$0F:$C649:8D FF BF	STA $BFFF  
0x03C65C|$0F:$C64C:60      	RTS        

; set CHR bank 1 based on A
; control flow target (from $C61C)
0x03C65D|$0F:$C64D:8D FF DF	STA $DFFF  
0x03C660|$0F:$C650:4A      	LSR        
0x03C661|$0F:$C651:8D FF DF	STA $DFFF  
0x03C664|$0F:$C654:4A      	LSR        
0x03C665|$0F:$C655:8D FF DF	STA $DFFF  
0x03C668|$0F:$C658:4A      	LSR        
0x03C669|$0F:$C659:8D FF DF	STA $DFFF  
0x03C66C|$0F:$C65C:4A      	LSR        
0x03C66D|$0F:$C65D:8D FF DF	STA $DFFF  
0x03C670|$0F:$C660:60      	RTS        

; control flow target (from $C608)
0x03C671|$0F:$C661:A9 FF   	LDA #$FF   
0x03C673|$0F:$C663:85 00   	STA $00    
0x03C675|$0F:$C665:84 01   	STY $01    	; Y is still #$00
0x03C677|$0F:$C667:A9 8F   	LDA #$8F   
0x03C679|$0F:$C669:85 30   	STA $30    
0x03C67B|$0F:$C66B:A9 00   	LDA #$00   
0x03C67D|$0F:$C66D:8D 07 60	STA $6007  
0x03C680|$0F:$C670:A9 88   	LDA #$88   
0x03C682|$0F:$C672:8D 00 20	STA $2000  	; PPU Control Register #1 (#$80: Execute NMI on VBlank, #$40: unused, #$20: Sprite Size [8x8/8x16], #$10: Background Pattern Table Address [$0000/$1000], #$08: Sprite Pattern Table Address [$0000/$1000], #$04: PPU Address Increment [1/32], #$03: Name Table Address [$2000/$2400/$2800/$2C00])
0x03C685|$0F:$C675:A9 00   	LDA #$00   
0x03C687|$0F:$C677:8D 01 20	STA $2001  	; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display)
0x03C68A|$0F:$C67A:20 68 C4	JSR $C468  	; set every 4th byte of $0200 - $02FC to #$F0
0x03C68D|$0F:$C67D:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03C690|$0F:$C680:20 75 F7	JSR $F775  	; load ROM bank #$03
; call to code in a different bank ($03:$8006)
0x03C693|$0F:$C683:20 06 80	JSR $8006  
0x03C696|$0F:$C686:A9 0A   	LDA #$0A   
0x03C698|$0F:$C688:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
; call to code in a different bank ($0A:$8000)
0x03C69B|$0F:$C68B:20 00 80	JSR $8000  
0x03C69E|$0F:$C68E:A9 0B   	LDA #$0B   
0x03C6A0|$0F:$C690:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
; call to code in a different bank ($0B:$8000)
0x03C6A3|$0F:$C693:20 00 80	JSR $8000  
0x03C6A6|$0F:$C696:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03C6A9|$0F:$C699:00	; $08:$8000

; data -> code
0x03C6AA|$0F:$C69A:A9 FF   	LDA #$FF   
0x03C6AC|$0F:$C69C:8D 08 60	STA $6008  
0x03C6AF|$0F:$C69F:A9 8F   	LDA #$8F   
0x03C6B1|$0F:$C6A1:85 30   	STA $30    
0x03C6B3|$0F:$C6A3:A2 1E   	LDX #$1E   
0x03C6B5|$0F:$C6A5:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03C6B8|$0F:$C6A8:20 5C F7	JSR $F75C  	; load ROM bank #$00
0x03C6BB|$0F:$C6AB:A9 05   	LDA #$05   
0x03C6BD|$0F:$C6AD:85 0C   	STA $0C    
; call to code in a different bank ($00:$8000)
0x03C6BF|$0F:$C6AF:20 00 80	JSR $8000  
0x03C6C2|$0F:$C6B2:20 5E C7	JSR $C75E  	; copy $C7A7-$C7AE to $053A-$0541, set $1F to #$FF
0x03C6C5|$0F:$C6B5:A2 17   	LDX #$17   
; control flow target (from $C6BE)
0x03C6C7|$0F:$C6B7:BD 8F C7	LDA $C78F,X	; hero starting equipment
0x03C6CA|$0F:$C6BA:9D 00 06	STA $0600,X	; Midenhall inventory item 1 (| #$40 if equipped)
0x03C6CD|$0F:$C6BD:CA      	DEX        
0x03C6CE|$0F:$C6BE:10 F7   	BPL $C6B7  
0x03C6D0|$0F:$C6C0:A9 FF   	LDA #$FF   
0x03C6D2|$0F:$C6C2:85 8E   	STA $8E    	; flag for in battle or not (#$FF)?
0x03C6D4|$0F:$C6C4:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03C6D7|$0F:$C6C7:C2	; $06:$8004; -> $06:$A843: display and handle main game menu

; data -> code
0x03C6D8|$0F:$C6C8:A9 00   	LDA #$00   
0x03C6DA|$0F:$C6CA:85 8E   	STA $8E    	; flag for in battle or not (#$FF)?
0x03C6DC|$0F:$C6CC:8D AD 61	STA $61AD  
0x03C6DF|$0F:$C6CF:AD 70 70	LDA $7070  	; ????, SRAM buffer
0x03C6E2|$0F:$C6D2:D0 19   	BNE $C6ED  
0x03C6E4|$0F:$C6D4:20 6C C7	JSR $C76C  
0x03C6E7|$0F:$C6D7:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03C6EA|$0F:$C6DA:CF	; $06:$801E; -> $06:$A885: copy save data from system RAM to per-game save data

; data -> code
0x03C6EB|$0F:$C6DB:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03C6EE|$0F:$C6DE:E0	; $07:$8000

; data -> code
0x03C6EF|$0F:$C6DF:A9 07   	LDA #$07   
0x03C6F1|$0F:$C6E1:85 48   	STA $48    	; last save point ID
0x03C6F3|$0F:$C6E3:20 1F C8	JSR $C81F  
0x03C6F6|$0F:$C6E6:A9 00   	LDA #$00   	; Save Point ID #$00: Midenhall 2F
0x03C6F8|$0F:$C6E8:85 48   	STA $48    	; last save point ID
0x03C6FA|$0F:$C6EA:4C 00 C7	JMP $C700  

; control flow target (from $C6D2)
0x03C6FD|$0F:$C6ED:20 61 F7	JSR $F761  	; load ROM bank #$06
0x03C700|$0F:$C6F0:20 6C C7	JSR $C76C  
0x03C703|$0F:$C6F3:20 2A C4	JSR $C42A  
0x03C706|$0F:$C6F6:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03C709|$0F:$C6F9:C3	; $06:$8006; -> $06:$ABC7: copy save data from save data buffer at $7000 to system RAM; update Don Mahone quest status if applicable

; data -> code
0x03C70A|$0F:$C6FA:20 B9 D2	JSR $D2B9  
; call to code in a different bank ($06:$8F4E)
0x03C70D|$0F:$C6FD:20 4E 8F	JSR $8F4E  
; control flow target (from $C6EA, $C716, $C898, $C91E, $C928, $C9BD, $CA4A, $CA91, $CAB0, $CAB7, $CB39, $CB5F, $CBA2, $CBDC, $CC07, $CC5D, $CC9F, $D292)
0x03C710|$0F:$C700:A9 00   	LDA #$00   
0x03C712|$0F:$C702:85 03   	STA $03    	; game clock?
; control flow target (from $C75B)
0x03C714|$0F:$C704:20 76 C4	JSR $C476  	; read joypad 1 data into $2F
0x03C717|$0F:$C707:A5 2F   	LDA $2F    	; joypad 1 data
0x03C719|$0F:$C709:4A      	LSR        
0x03C71A|$0F:$C70A:90 0D   	BCC $C719  
0x03C71C|$0F:$C70C:20 61 F7	JSR $F761  	; load ROM bank #$06
; call to code in a different bank ($06:$8048)
0x03C71F|$0F:$C70F:20 48 80	JSR $8048  
0x03C722|$0F:$C712:A9 00   	LDA #$00   
0x03C724|$0F:$C714:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03C726|$0F:$C716:4C 00 C7	JMP $C700  

; control flow target (from $C70A)
0x03C729|$0F:$C719:A5 2F   	LDA $2F    	; joypad 1 data
0x03C72B|$0F:$C71B:29 10   	AND #$10   
0x03C72D|$0F:$C71D:F0 06   	BEQ $C725  
0x03C72F|$0F:$C71F:20 97 E7	JSR $E797  
0x03C732|$0F:$C722:4C 7F C8	JMP $C87F  

; control flow target (from $C71D)
0x03C735|$0F:$C725:A5 2F   	LDA $2F    	; joypad 1 data
0x03C737|$0F:$C727:29 20   	AND #$20   
0x03C739|$0F:$C729:F0 06   	BEQ $C731  
0x03C73B|$0F:$C72B:20 B4 E6	JSR $E6B4  
0x03C73E|$0F:$C72E:4C 7F C8	JMP $C87F  

; control flow target (from $C729)
0x03C741|$0F:$C731:A5 2F   	LDA $2F    	; joypad 1 data
0x03C743|$0F:$C733:29 40   	AND #$40   
0x03C745|$0F:$C735:F0 06   	BEQ $C73D  
0x03C747|$0F:$C737:20 36 E6	JSR $E636  
0x03C74A|$0F:$C73A:4C 7F C8	JMP $C87F  

; control flow target (from $C735)
0x03C74D|$0F:$C73D:A5 2F   	LDA $2F    	; joypad 1 data
0x03C74F|$0F:$C73F:10 06   	BPL $C747  
0x03C751|$0F:$C741:20 C2 E5	JSR $E5C2  
0x03C754|$0F:$C744:4C 7F C8	JMP $C87F  

; control flow target (from $C73F, $D426, $E5CD, $E641, $E6BF, $E7A2)
0x03C757|$0F:$C747:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03C75A|$0F:$C74A:A5 03   	LDA $03    	; game clock?
0x03C75C|$0F:$C74C:C9 51   	CMP #$51   
0x03C75E|$0F:$C74E:D0 08   	BNE $C758  
0x03C760|$0F:$C750:20 76 EB	JSR $EB76  	; open menu specified by next byte

; code -> data
; indirect data load target
0x03C763|$0F:$C753:00	; Menu ID #$00: Mini status window, bottom

; data -> code
0x03C764|$0F:$C754:A9 51   	LDA #$51   
0x03C766|$0F:$C756:85 03   	STA $03    	; game clock?
; control flow target (from $C74E)
0x03C768|$0F:$C758:20 CB D8	JSR $D8CB  
0x03C76B|$0F:$C75B:4C 04 C7	JMP $C704  

; copy $C7A7-$C7AE to $053A-$0541, set $1F to #$FF
; control flow target (from $C6B2)
0x03C76E|$0F:$C75E:A0 07   	LDY #$07   
; control flow target (from $C767)
0x03C770|$0F:$C760:B9 A7 C7	LDA $C7A7,Y
0x03C773|$0F:$C763:99 3A 05	STA $053A,Y
0x03C776|$0F:$C766:88      	DEY        
0x03C777|$0F:$C767:10 F7   	BPL $C760  
0x03C779|$0F:$C769:84 1F   	STY $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu); $1F = #$FF
0x03C77B|$0F:$C76B:60      	RTS        

; control flow target (from $C6D4, $C6F0)
0x03C77C|$0F:$C76C:A9 84   	LDA #$84   
0x03C77E|$0F:$C76E:8D 2D 06	STA $062D  	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03C781|$0F:$C771:20 66 F7	JSR $F766  	; load ROM bank #$04
; call to code in a different bank ($04:$8009)
0x03C784|$0F:$C774:20 09 80	JSR $8009  	; update each hero's stats based on their current EXP
0x03C787|$0F:$C777:A9 0F   	LDA #$0F   
0x03C789|$0F:$C779:85 30   	STA $30    
; restore full HP/MP to all living party members
; control flow target (from $D2D5)
; external control flow target (from $06:$9419, $06:$BD4C)
0x03C78B|$0F:$C77B:A9 01   	LDA #$01   	; make sure each hero has at least 1 HP so that $06:$8DCC will fully heal them
0x03C78D|$0F:$C77D:8D 3B 06	STA $063B  	; Midenhall Current HP, low byte
0x03C790|$0F:$C780:8D 4D 06	STA $064D  	; Cannock Current HP, low byte
0x03C793|$0F:$C783:8D 5F 06	STA $065F  	; Moonbrooke Current HP, low byte
0x03C796|$0F:$C786:20 61 F7	JSR $F761  	; load ROM bank #$06
; call to code in a different bank ($06:$8DCC)
0x03C799|$0F:$C789:20 CC 8D	JSR $8DCC  	; restore full HP to all living party members
; call to code in a different bank ($06:$8DEC)
0x03C79C|$0F:$C78C:4C EC 8D	JMP $8DEC  	; restore full MP to all living party members


; code -> data
; hero starting equipment
; Midenhall
; indexed data load target (from $C6B7)
0x03C79F|$0F:$C78F:55	; Item ID #$55: Leather Armor (equipped)
0x03C7A0|$0F:$C790:00	; Item ID #$00: (no item)
0x03C7A1|$0F:$C791:00	; Item ID #$00: (no item)
0x03C7A2|$0F:$C792:00	; Item ID #$00: (no item)
0x03C7A3|$0F:$C793:00	; Item ID #$00: (no item)
0x03C7A4|$0F:$C794:00	; Item ID #$00: (no item)
0x03C7A5|$0F:$C795:00	; Item ID #$00: (no item)
0x03C7A6|$0F:$C796:00	; Item ID #$00: (no item)
; Cannock
0x03C7A7|$0F:$C797:45	; Item ID #$45: Club (equipped)
0x03C7A8|$0F:$C798:55	; Item ID #$55: Leather Armor (equipped)
0x03C7A9|$0F:$C799:00	; Item ID #$00: (no item)
0x03C7AA|$0F:$C79A:00	; Item ID #$00: (no item)
0x03C7AB|$0F:$C79B:00	; Item ID #$00: (no item)
0x03C7AC|$0F:$C79C:00	; Item ID #$00: (no item)
0x03C7AD|$0F:$C79D:00	; Item ID #$00: (no item)
0x03C7AE|$0F:$C79E:00	; Item ID #$00: (no item)
; Moonbrooke
0x03C7AF|$0F:$C79F:41	; Item ID #$41: Bamboo Stick (equipped)
0x03C7B0|$0F:$C7A0:51	; Item ID #$51: Clothes (equipped)
0x03C7B1|$0F:$C7A1:00	; Item ID #$00: (no item)
0x03C7B2|$0F:$C7A2:00	; Item ID #$00: (no item)
0x03C7B3|$0F:$C7A3:00	; Item ID #$00: (no item)
0x03C7B4|$0F:$C7A4:00	; Item ID #$00: (no item)
0x03C7B5|$0F:$C7A5:00	; Item ID #$00: (no item)
0x03C7B6|$0F:$C7A6:00	; Item ID #$00: (no item)
; indexed data load target (from $C760)
0x03C7B7|$0F:$C7A7:80
0x03C7B8|$0F:$C7A8:6F
0x03C7B9|$0F:$C7A9:00
0x03C7BA|$0F:$C7AA:00
0x03C7BB|$0F:$C7AB:00
0x03C7BC|$0F:$C7AC:00
0x03C7BD|$0F:$C7AD:02
0x03C7BE|$0F:$C7AE:00

; data -> code
; control flow target (from $C81F, $D2D8, $FF5A)
0x03C7BF|$0F:$C7AF:A9 FF   	LDA #$FF   
0x03C7C1|$0F:$C7B1:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03C7C3|$0F:$C7B3:A5 48   	LDA $48    	; last save point ID
0x03C7C5|$0F:$C7B5:0A      	ASL        
0x03C7C6|$0F:$C7B6:0A      	ASL        
0x03C7C7|$0F:$C7B7:A8      	TAY        
0x03C7C8|$0F:$C7B8:B9 EF C7	LDA $C7EF,Y	; save point map ID
0x03C7CB|$0F:$C7BB:85 31   	STA $31    	; current map ID
0x03C7CD|$0F:$C7BD:B9 F0 C7	LDA $C7F0,Y	; save point X-pos
0x03C7D0|$0F:$C7C0:85 16   	STA $16    	; current map X-pos (1)
0x03C7D2|$0F:$C7C2:85 28   	STA $28    	; current map X-pos (2)
0x03C7D4|$0F:$C7C4:85 2A   	STA $2A    	; current map X-pos pixel, low byte
0x03C7D6|$0F:$C7C6:B9 F1 C7	LDA $C7F1,Y	; save point Y-pos
0x03C7D9|$0F:$C7C9:85 17   	STA $17    	; current map Y-pos (1)
0x03C7DB|$0F:$C7CB:85 29   	STA $29    	; current map Y-pos (2)
0x03C7DD|$0F:$C7CD:85 2C   	STA $2C    	; current map Y-pos pixel, low byte
0x03C7DF|$0F:$C7CF:B9 F2 C7	LDA $C7F2,Y	; save point ???
0x03C7E2|$0F:$C7D2:85 45   	STA $45    
0x03C7E4|$0F:$C7D4:A9 00   	LDA #$00   
0x03C7E6|$0F:$C7D6:85 38   	STA $38    
0x03C7E8|$0F:$C7D8:85 2B   	STA $2B    	; current map X-pos pixel, high byte
0x03C7EA|$0F:$C7DA:85 2D   	STA $2D    	; current map Y-pos pixel, high byte
0x03C7EC|$0F:$C7DC:A2 04   	LDX #$04   	; convert 16x16 map positions to pixels
; control flow target (from $C7E7)
0x03C7EE|$0F:$C7DE:06 2A   	ASL $2A    	; current map X-pos pixel, low byte
0x03C7F0|$0F:$C7E0:26 2B   	ROL $2B    	; current map X-pos pixel, high byte
0x03C7F2|$0F:$C7E2:06 2C   	ASL $2C    	; current map Y-pos pixel, low byte
0x03C7F4|$0F:$C7E4:26 2D   	ROL $2D    	; current map Y-pos pixel, high byte
0x03C7F6|$0F:$C7E6:CA      	DEX        
0x03C7F7|$0F:$C7E7:D0 F5   	BNE $C7DE  
0x03C7F9|$0F:$C7E9:20 8A E2	JSR $E28A  
0x03C7FC|$0F:$C7EC:4C DC C1	JMP $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF


; code -> data
; save point map ID
; indexed data load target (from $C7B8)
0x03C7FF|$0F:$C7EF:02
; save point X-pos
; indexed data load target (from $C7BD)
0x03C800|$0F:$C7F0:   03
; save point Y-pos
; indexed data load target (from $C7C6)
0x03C801|$0F:$C7F1:      04
; save point ???
; indexed data load target (from $C7CF)
0x03C802|$0F:$C7F2:         05	; Save Point ID #$00: Midenhall 2F
; indirect data load target
0x03C803|$0F:$C7F3:06 03 05 05	; Save Point ID #$01: Cannock
0x03C807|$0F:$C7F7:0C 1B 07 05	; Save Point ID #$02: Tantegel
0x03C80B|$0F:$C7FB:0F 0E 06 05	; Save Point ID #$03: Osterfair
0x03C80F|$0F:$C7FF:15 02 02 05	; Save Point ID #$04: Beran
0x03C813|$0F:$C803:1F 04 03 05	; Save Point ID #$05: Rhone Shrine
0x03C817|$0F:$C807:07 0F 02 05	; Save Point ID #$06: Hamlin
0x03C81B|$0F:$C80B:02 06 03 00	; Map ID #$02: Midenhall 2F
0x03C81F|$0F:$C80F:09 07 0A FF	; Map ID #$09: Moonbrooke
0x03C823|$0F:$C813:03 0F 11 FF	; Map ID #$03: Midenhall 1F
0x03C827|$0F:$C817:01 63 6F FF	; Map ID #$01: World Map
0x03C82B|$0F:$C81B:01 CF 38 FF	; Map ID #$01: World Map

; data -> code
; control flow target (from $C6E3)
0x03C82F|$0F:$C81F:20 AF C7	JSR $C7AF  
0x03C832|$0F:$C822:A9 0A   	LDA #$0A   
0x03C834|$0F:$C824:8D 71 05	STA $0571  	; NPC #$06 sprite ID
0x03C837|$0F:$C827:20 CB D8	JSR $D8CB  
0x03C83A|$0F:$C82A:A2 3C   	LDX #$3C   
0x03C83C|$0F:$C82C:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03C83F|$0F:$C82F:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03C842|$0F:$C832:83
; indirect data load target
0x03C843|$0F:$C833:20
; indirect data load target
0x03C844|$0F:$C834:C1 80	; $07:$80C1; motion script for guard #2 part 9, prologue

; data -> code
0x03C846|$0F:$C836:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03C849|$0F:$C839:A2 3C   	LDX #$3C   
0x03C84B|$0F:$C83B:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03C84E|$0F:$C83E:20 EA F6	JSR $F6EA  	; open main dialogue window and display string ID specified by byte following JSR

; code -> data
; indirect data load target
0x03C851|$0F:$C841:73	; String ID #$0073: ‘Hear me, oh King[.’][wait][line]‘The army of Hargon the Sorcerer has sacked Moonbrooke Castle from whence I came[.’][wait][line]‘The evil of his magic is great and I fear he will soon rule all the world[..][..][wait][line]unless a monarch as great as thyself stands against him[.’][end-FC]

; data -> code
0x03C852|$0F:$C842:A9 FF   	LDA #$FF   
0x03C854|$0F:$C844:8D 71 05	STA $0571  	; NPC #$06 sprite ID
0x03C857|$0F:$C847:20 CB D8	JSR $D8CB  
0x03C85A|$0F:$C84A:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03C85D|$0F:$C84D:20 76 EB	JSR $EB76  	; open menu specified by next byte

; code -> data
; indirect data load target
0x03C860|$0F:$C850:04	; Menu ID #$04: Dialogue window

; data -> code
0x03C861|$0F:$C851:A9 00   	LDA #$00   
0x03C863|$0F:$C853:20 50 FC	JSR $FC50  	; print name of hero given by low 2 bits of A to $6119, terminated by #$FA
0x03C866|$0F:$C856:20 2A FA	JSR $FA2A  	; display string ID specified by next byte

; code -> data
; indirect data load target
0x03C869|$0F:$C859:74	; String ID #$0074: ‘[name], my heir. Thou hast heard the tale of this man[.’][wait][line]‘I am old and this task must fall to younger hands[.’][wait][line]‘Thy destiny lies on that difficult road, just as it did for Erdrick the Great,[wait][line]for thou art of the line of Erdrick, and his doom is thine[.’][wait][line]‘Come with me now if thou art ready[.’][end-FC]

; data -> code
0x03C86A|$0F:$C85A:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03C86D|$0F:$C85D:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03C870|$0F:$C860:81
; indirect data load target
0x03C871|$0F:$C861:22
; indirect data load target
0x03C872|$0F:$C862:4A 80	; $07:$804A; motion script for King Midenhall, Lighthouse Wizard part 1

; data -> code
0x03C874|$0F:$C864:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03C877|$0F:$C867:A9 03   	LDA #$03   
0x03C879|$0F:$C869:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03C87B|$0F:$C86B:A9 00   	LDA #$00   
0x03C87D|$0F:$C86D:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03C87F|$0F:$C86F:60      	RTS        


; code -> data
; Hargon's minion map ID
; indexed data load target (from $C8AF)
0x03C880|$0F:$C870:46
; Hargon's minion X-pos
; indexed data load target (from $C8B7)
; indirect data load target
0x03C881|$0F:$C871:   06
; Hargon's minion Y-pos
; indexed data load target (from $C8BF)
0x03C882|$0F:$C872:      05
; Hargon's minion $05FD value
; indexed data load target (from $C8C4)
0x03C883|$0F:$C873:         04
; Hargon's minion fixed encounter ID
; indexed data load target (from $C8CE)
0x03C884|$0F:$C874:            08	; Map ID #$46: Hargon's Castle 4F
0x03C885|$0F:$C875:47 01 01 08 09	; Map ID #$47: Hargon's Castle 5F
0x03C88A|$0F:$C87A:48 0B 03 10 0A	; Map ID #$48: Hargon's Castle 6F

; data -> code
; control flow target (from $C722, $C72E, $C73A, $C744)
0x03C88F|$0F:$C87F:20 6B D4	JSR $D46B  
0x03C892|$0F:$C882:A5 D0   	LDA $D0    	; Malroth status flag (#$FF = defeated, #$00 = alive, others = countdown to battle)
0x03C894|$0F:$C884:10 15   	BPL $C89B  
0x03C896|$0F:$C886:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03C899|$0F:$C889:DD	; $06:$803A

; data -> code
0x03C89A|$0F:$C88A:A5 31   	LDA $31    	; current map ID
0x03C89C|$0F:$C88C:C9 03   	CMP #$03   	; Map ID #$03: Midenhall 1F
0x03C89E|$0F:$C88E:D0 08   	BNE $C898  
0x03C8A0|$0F:$C890:A9 06   	LDA #$06   
0x03C8A2|$0F:$C892:85 94   	STA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03C8A4|$0F:$C894:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03C8A7|$0F:$C897:DC	; $06:$8038

; data -> code
; control flow target (from $C88E)
0x03C8A8|$0F:$C898:4C 00 C7	JMP $C700  

; control flow target (from $C884)
0x03C8AB|$0F:$C89B:20 61 F7	JSR $F761  	; load ROM bank #$06
; call to code in a different bank ($06:$A09E)
0x03C8AE|$0F:$C89E:20 9E A0	JSR $A09E  
0x03C8B1|$0F:$C8A1:EA      	NOP        
0x03C8B2|$0F:$C8A2:EA      	NOP        
0x03C8B3|$0F:$C8A3:EA      	NOP        
0x03C8B4|$0F:$C8A4:EA      	NOP        
0x03C8B5|$0F:$C8A5:EA      	NOP        
0x03C8B6|$0F:$C8A6:EA      	NOP        
0x03C8B7|$0F:$C8A7:A5 31   	LDA $31    	; current map ID
0x03C8B9|$0F:$C8A9:C9 0F   	CMP #$0F   	; Map ID #$0F: Osterfair
0x03C8BB|$0F:$C8AB:F0 5E   	BEQ $C90B  
0x03C8BD|$0F:$C8AD:A0 00   	LDY #$00   
; control flow target (from $C8EA)
0x03C8BF|$0F:$C8AF:D9 70 C8	CMP $C870,Y	; Hargon's minion map ID
0x03C8C2|$0F:$C8B2:D0 2F   	BNE $C8E3  
0x03C8C4|$0F:$C8B4:A5 16   	LDA $16    	; current map X-pos (1)
0x03C8C6|$0F:$C8B6:4A      	LSR        
0x03C8C7|$0F:$C8B7:D9 71 C8	CMP $C871,Y	; Hargon's minion X-pos
0x03C8CA|$0F:$C8BA:D0 30   	BNE $C8EC  
0x03C8CC|$0F:$C8BC:A5 17   	LDA $17    	; current map Y-pos (1)
0x03C8CE|$0F:$C8BE:4A      	LSR        
0x03C8CF|$0F:$C8BF:D9 72 C8	CMP $C872,Y	; Hargon's minion Y-pos
0x03C8D2|$0F:$C8C2:D0 28   	BNE $C8EC  
0x03C8D4|$0F:$C8C4:B9 73 C8	LDA $C873,Y	; Hargon's minion $05FD value
0x03C8D7|$0F:$C8C7:8D FD 05	STA $05FD  
0x03C8DA|$0F:$C8CA:25 D1   	AND $D1    	; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown)
0x03C8DC|$0F:$C8CC:D0 1E   	BNE $C8EC  	; branch if minion already dead
0x03C8DE|$0F:$C8CE:B9 74 C8	LDA $C874,Y	; Hargon's minion fixed encounter ID
0x03C8E1|$0F:$C8D1:20 5C D2	JSR $D25C  	; trigger fixed battle A
0x03C8E4|$0F:$C8D4:A5 98   	LDA $98    	; outcome of last fight?
0x03C8E6|$0F:$C8D6:C9 FC   	CMP #$FC   
0x03C8E8|$0F:$C8D8:F0 12   	BEQ $C8EC  
0x03C8EA|$0F:$C8DA:A5 D1   	LDA $D1    	; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown)
0x03C8EC|$0F:$C8DC:0D FD 05	ORA $05FD  
0x03C8EF|$0F:$C8DF:85 D1   	STA $D1    	; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown)
0x03C8F1|$0F:$C8E1:D0 09   	BNE $C8EC  
; control flow target (from $C8B2)
0x03C8F3|$0F:$C8E3:C8      	INY        
0x03C8F4|$0F:$C8E4:C8      	INY        
0x03C8F5|$0F:$C8E5:C8      	INY        
0x03C8F6|$0F:$C8E6:C8      	INY        
0x03C8F7|$0F:$C8E7:C8      	INY        
0x03C8F8|$0F:$C8E8:C0 0F   	CPY #$0F   
0x03C8FA|$0F:$C8EA:D0 C3   	BNE $C8AF  
; control flow target (from $C8BA, $C8C2, $C8CC, $C8D8, $C8E1)
0x03C8FC|$0F:$C8EC:20 66 F7	JSR $F766  	; load ROM bank #$04
0x03C8FF|$0F:$C8EF:A5 1D   	LDA $1D    
0x03C901|$0F:$C8F1:F0 12   	BEQ $C905  
0x03C903|$0F:$C8F3:A9 00   	LDA #$00   
0x03C905|$0F:$C8F5:AE FD 05	LDX $05FD  
0x03C908|$0F:$C8F8:8D FD 05	STA $05FD  
0x03C90B|$0F:$C8FB:E0 00   	CPX #$00   
0x03C90D|$0F:$C8FD:F0 06   	BEQ $C905  
; call to code in a different bank ($04:$8018)
0x03C90F|$0F:$C8FF:20 18 80	JSR $8018  
0x03C912|$0F:$C902:4C 08 C9	JMP $C908  

; control flow target (from $C8F1, $C8FD)
; call to code in a different bank ($04:$8000)
0x03C915|$0F:$C905:20 00 80	JSR $8000  
; control flow target (from $C902)
0x03C918|$0F:$C908:20 62 D2	JSR $D262  
; control flow target (from $C8AB)
0x03C91B|$0F:$C90B:A5 31   	LDA $31    	; current map ID
0x03C91D|$0F:$C90D:C9 29   	CMP #$29   	; Map ID #$29: Rubiss' Shrine B7
0x03C91F|$0F:$C90F:D0 10   	BNE $C921  
0x03C921|$0F:$C911:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03C924|$0F:$C914:03
; indirect data load target
0x03C925|$0F:$C915:03

; data -> code
0x03C926|$0F:$C916:D0 09   	BNE $C921  
0x03C928|$0F:$C918:20 FB D2	JSR $D2FB  	; load ROM bank 6
; call to code in a different bank ($06:$A2A7)
0x03C92B|$0F:$C91B:20 A7 A2	JSR $A2A7  
0x03C92E|$0F:$C91E:4C 00 C7	JMP $C700  

; control flow target (from $C90F, $C916)
0x03C931|$0F:$C921:A5 44   	LDA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03C933|$0F:$C923:F0 06   	BEQ $C92B  
0x03C935|$0F:$C925:4C C0 C9	JMP $C9C0  

; control flow target (from $C930)
0x03C938|$0F:$C928:4C 00 C7	JMP $C700  

; control flow target (from $C923)
0x03C93B|$0F:$C92B:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03C93E|$0F:$C92E:05
; indirect data load target
0x03C93F|$0F:$C92F:08

; data -> code
0x03C940|$0F:$C930:D0 F6   	BNE $C928  
0x03C942|$0F:$C932:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03C945|$0F:$C935:88
; indirect data load target
0x03C946|$0F:$C936:22
; indirect data load target
0x03C947|$0F:$C937:10 80	; $07:$8010; motion script for granddaughter in Lianport, part 1

; data -> code
0x03C949|$0F:$C939:A9 00   	LDA #$00   
0x03C94B|$0F:$C93B:85 98   	STA $98    	; outcome of last fight?
0x03C94D|$0F:$C93D:20 D2 CC	JSR $CCD2  	; execute scripted motion
; control flow target (from $C978)
0x03C950|$0F:$C940:20 F6 F6	JSR $F6F6  	; open main dialogue window and display string ID specified by byte following JSR + #$0200

; code -> data
; indirect data load target
0x03C953|$0F:$C943:B3	; String ID #$02B3: ‘Help! Help! Evil has come!’[end-FC]

; data -> code
0x03C954|$0F:$C944:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03C957|$0F:$C947:A5 98   	LDA $98    	; outcome of last fight?
0x03C959|$0F:$C949:D0 11   	BNE $C95C  
0x03C95B|$0F:$C94B:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03C95E|$0F:$C94E:87
; indirect data load target
0x03C95F|$0F:$C94F:20
; indirect data load target
0x03C960|$0F:$C950:1D 80	; $07:$801D; motion script for Lianport Gremlin #1

; data -> code
0x03C962|$0F:$C952:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03C965|$0F:$C955:86
; indirect data load target
0x03C966|$0F:$C956:23
; indirect data load target
0x03C967|$0F:$C957:18 80	; $07:$8018; motion script for Lianport Gremlin #2

; data -> code
0x03C969|$0F:$C959:20 D2 CC	JSR $CCD2  	; execute scripted motion
; control flow target (from $C949)
0x03C96C|$0F:$C95C:20 66 F7	JSR $F766  	; load ROM bank #$04
0x03C96F|$0F:$C95F:A9 00   	LDA #$00   	; Fixed Battle #$00: 2 Gremlins (Map ID #$0B: Lianport)
; call to code in a different bank ($04:$800F)
0x03C971|$0F:$C961:20 0F 80	JSR $800F  
0x03C974|$0F:$C964:A9 00   	LDA #$00   
0x03C976|$0F:$C966:85 8E   	STA $8E    	; flag for in battle or not (#$FF)?
0x03C978|$0F:$C968:A5 98   	LDA $98    	; outcome of last fight?
0x03C97A|$0F:$C96A:C9 FC   	CMP #$FC   
0x03C97C|$0F:$C96C:F0 04   	BEQ $C972  
0x03C97E|$0F:$C96E:C9 FF   	CMP #$FF   
0x03C980|$0F:$C970:D0 09   	BNE $C97B  
; control flow target (from $C96C)
0x03C982|$0F:$C972:20 62 D2	JSR $D262  
0x03C985|$0F:$C975:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03C988|$0F:$C978:4C 40 C9	JMP $C940  

; control flow target (from $C970)
0x03C98B|$0F:$C97B:20 2A C4	JSR $C42A  
0x03C98E|$0F:$C97E:A9 FF   	LDA #$FF   
0x03C990|$0F:$C980:8D 89 05	STA $0589  	; NPC #$09 sprite ID
0x03C993|$0F:$C983:8D 91 05	STA $0591  	; NPC #$0A sprite ID
0x03C996|$0F:$C986:A9 05   	LDA #$05   
0x03C998|$0F:$C988:8D 94 05	STA $0594  	; NPC #$0B X-pos
0x03C99B|$0F:$C98B:A9 08   	LDA #$08   
0x03C99D|$0F:$C98D:8D 95 05	STA $0595  	; NPC #$0B Y-pos
0x03C9A0|$0F:$C990:A9 03   	LDA #$03   
0x03C9A2|$0F:$C992:8D 98 05	STA $0598  	; NPC #$0B motion nybble + direction nybble
0x03C9A5|$0F:$C995:A9 04   	LDA #$04   
0x03C9A7|$0F:$C997:85 16   	STA $16    	; current map X-pos (1)
0x03C9A9|$0F:$C999:85 28   	STA $28    	; current map X-pos (2)
0x03C9AB|$0F:$C99B:A9 40   	LDA #$40   
0x03C9AD|$0F:$C99D:85 2A   	STA $2A    	; current map X-pos pixel, low byte
0x03C9AF|$0F:$C99F:A9 01   	LDA #$01   	; update ship status: you beat the Gremlins
0x03C9B1|$0F:$C9A1:85 CF   	STA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03C9B3|$0F:$C9A3:A9 06   	LDA #$06   
0x03C9B5|$0F:$C9A5:20 9A D2	JSR $D29A  
0x03C9B8|$0F:$C9A8:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03C9BB|$0F:$C9AB:20 F6 F6	JSR $F6F6  	; open main dialogue window and display string ID specified by byte following JSR + #$0200

; code -> data
; indirect data load target
0x03C9BE|$0F:$C9AE:B4	; String ID #$02B4: ‘Thou hast saved me from the fiends[.’][wait][line]‘Please follow me and meet my grandfather[.’][end-FC]

; data -> code
0x03C9BF|$0F:$C9AF:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03C9C2|$0F:$C9B2:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03C9C5|$0F:$C9B5:88
; indirect data load target
0x03C9C6|$0F:$C9B6:21
; indirect data load target
0x03C9C7|$0F:$C9B7:22 80	; $07:$8022; motion script for granddaughter in Lianport, part 2

; data -> code
0x03C9C9|$0F:$C9B9:A9 01   	LDA #$01   
0x03C9CB|$0F:$C9BB:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03C9CD|$0F:$C9BD:4C 00 C7	JMP $C700  

; control flow target (from $C925)
0x03C9D0|$0F:$C9C0:C9 01   	CMP #$01   
0x03C9D2|$0F:$C9C2:F0 03   	BEQ $C9C7  
0x03C9D4|$0F:$C9C4:4C 4D CA	JMP $CA4D  

; control flow target (from $C9C2)
0x03C9D7|$0F:$C9C7:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03C9DA|$0F:$C9CA:0F
; indirect data load target
0x03C9DB|$0F:$C9CB:08

; data -> code
0x03C9DC|$0F:$C9CC:D0 04   	BNE $C9D2  
0x03C9DE|$0F:$C9CE:A9 01   	LDA #$01   
0x03C9E0|$0F:$C9D0:D0 1B   	BNE $C9ED  
; control flow target (from $C9CC)
0x03C9E2|$0F:$C9D2:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03C9E5|$0F:$C9D5:11
; indirect data load target
0x03C9E6|$0F:$C9D6:08

; data -> code
0x03C9E7|$0F:$C9D7:D0 04   	BNE $C9DD  
0x03C9E9|$0F:$C9D9:A9 03   	LDA #$03   
0x03C9EB|$0F:$C9DB:D0 10   	BNE $C9ED  
; control flow target (from $C9D7)
0x03C9ED|$0F:$C9DD:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03C9F0|$0F:$C9E0:10
; indirect data load target
0x03C9F1|$0F:$C9E1:09

; data -> code
0x03C9F2|$0F:$C9E2:D0 66   	BNE $CA4A  
0x03C9F4|$0F:$C9E4:A9 00   	LDA #$00   
0x03C9F6|$0F:$C9E6:8D 40 05	STA $0540  	; NPC #$00 ? + direction nybble
0x03C9F9|$0F:$C9E9:A9 02   	LDA #$02   
0x03C9FB|$0F:$C9EB:D0 03   	BNE $C9F0  
; control flow target (from $C9D0, $C9DB)
0x03C9FD|$0F:$C9ED:8D 40 05	STA $0540  	; NPC #$00 ? + direction nybble
; control flow target (from $C9EB)
0x03CA00|$0F:$C9F0:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CA02|$0F:$C9F2:20 F6 F6	JSR $F6F6  	; open main dialogue window and display string ID specified by byte following JSR + #$0200

; code -> data
; indirect data load target
0x03CA05|$0F:$C9F5:B5	; String ID #$02B5: ‘These good people aided me in my time of need, Grandfather[.’][FD][FD][end-FC]

; data -> code
0x03CA06|$0F:$C9F6:A5 44   	LDA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CA08|$0F:$C9F8:C9 01   	CMP #$01   
0x03CA0A|$0F:$C9FA:D0 09   	BNE $CA05  
0x03CA0C|$0F:$C9FC:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CA0F|$0F:$C9FF:88
; indirect data load target
0x03CA10|$0F:$CA00:20
; indirect data load target
0x03CA11|$0F:$CA01:2F 80	; $07:$802F; motion script for granddaughter in Lianport, part 3 (from left)

; data -> code
0x03CA13|$0F:$CA03:90 07   	BCC $CA0C  
; control flow target (from $C9FA)
0x03CA15|$0F:$CA05:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CA18|$0F:$CA08:88
; indirect data load target
0x03CA19|$0F:$CA09:20
; indirect data load target
0x03CA1A|$0F:$CA0A:33 80	; $07:$8033; motion script for granddaughter in Lianport, part 3 (from right)

; data -> code
; control flow target (from $CA03)
0x03CA1C|$0F:$CA0C:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03CA1F|$0F:$CA0F:A5 44   	LDA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CA21|$0F:$CA11:C9 01   	CMP #$01   
0x03CA23|$0F:$CA13:D0 09   	BNE $CA1E  
0x03CA25|$0F:$CA15:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CA28|$0F:$CA18:89
; indirect data load target
0x03CA29|$0F:$CA19:22
; indirect data load target
0x03CA2A|$0F:$CA1A:36 80	; $07:$8036; motion script for grandfather in Lianport, part 1 (from left or bottom)

; data -> code
0x03CA2C|$0F:$CA1C:90 14   	BCC $CA32  
; control flow target (from $CA13)
0x03CA2E|$0F:$CA1E:C9 02   	CMP #$02   
0x03CA30|$0F:$CA20:D0 09   	BNE $CA2B  
0x03CA32|$0F:$CA22:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CA35|$0F:$CA25:89
; indirect data load target
0x03CA36|$0F:$CA26:22
; indirect data load target
0x03CA37|$0F:$CA27:39 80	; $07:$8039; motion script for grandfather in Lianport, part 1 (from bottom)

; data -> code
0x03CA39|$0F:$CA29:90 07   	BCC $CA32  
; control flow target (from $CA20)
0x03CA3B|$0F:$CA2B:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CA3E|$0F:$CA2E:89
; indirect data load target
0x03CA3F|$0F:$CA2F:22
; indirect data load target
0x03CA40|$0F:$CA30:3C 80	; $07:$803C; motion script for grandfather in Lianport, part 1 (from right)

; data -> code
; control flow target (from $CA1C, $CA29)
0x03CA42|$0F:$CA32:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03CA45|$0F:$CA35:20 32 FA	JSR $FA32  	; display string ID specified by next byte + #$0200

; code -> data
; indirect data load target
0x03CA48|$0F:$CA38:B6	; String ID #$02B6: ‘Having gallantly aided my granddaughter,[wait][line]I shall gladly lend thee my swiftest ship[.’][end-FC]

; data -> code
0x03CA49|$0F:$CA39:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03CA4C|$0F:$CA3C:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CA4F|$0F:$CA3F:89
; indirect data load target
0x03CA50|$0F:$CA40:20
; indirect data load target
0x03CA51|$0F:$CA41:3F 80	; $07:$803F; motion script for grandfather in Lianport, part 2

; data -> code
; control flow target (from $CA6D)
0x03CA53|$0F:$CA43:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03CA56|$0F:$CA46:A9 FF   	LDA #$FF   
0x03CA58|$0F:$CA48:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
; control flow target (from $C9E2, $CA5D)
0x03CA5A|$0F:$CA4A:4C 00 C7	JMP $C700  

; control flow target (from $C9C4)
0x03CA5D|$0F:$CA4D:C9 02   	CMP #$02   
0x03CA5F|$0F:$CA4F:D0 1E   	BNE $CA6F  
0x03CA61|$0F:$CA51:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CA64|$0F:$CA54:03
; indirect data load target
0x03CA65|$0F:$CA55:03

; data -> code
0x03CA66|$0F:$CA56:F0 07   	BEQ $CA5F  
0x03CA68|$0F:$CA58:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CA6B|$0F:$CA5B:04
; indirect data load target
0x03CA6C|$0F:$CA5C:03

; data -> code
0x03CA6D|$0F:$CA5D:D0 EB   	BNE $CA4A  
; control flow target (from $CA56)
0x03CA6F|$0F:$CA5F:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CA72|$0F:$CA62:82
; indirect data load target
0x03CA73|$0F:$CA63:23
; indirect data load target
0x03CA74|$0F:$CA64:47 80	; $07:$8047; motion script for guard #1, Shrine SW of Cannock

; data -> code
0x03CA76|$0F:$CA66:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CA79|$0F:$CA69:81
; indirect data load target
0x03CA7A|$0F:$CA6A:21
; indirect data load target
0x03CA7B|$0F:$CA6B:44 80	; $07:$8044; motion script for guard #1, Shrine SW of Cannock

; data -> code
0x03CA7D|$0F:$CA6D:90 D4   	BCC $CA43  
; control flow target (from $CA4F)
0x03CA7F|$0F:$CA6F:C9 03   	CMP #$03   
0x03CA81|$0F:$CA71:D0 21   	BNE $CA94  
0x03CA83|$0F:$CA73:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CA86|$0F:$CA76:03
; indirect data load target
0x03CA87|$0F:$CA77:06

; data -> code
0x03CA88|$0F:$CA78:F0 0E   	BEQ $CA88  
0x03CA8A|$0F:$CA7A:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CA8D|$0F:$CA7D:03
; indirect data load target
0x03CA8E|$0F:$CA7E:08

; data -> code
0x03CA8F|$0F:$CA7F:F0 07   	BEQ $CA88  
0x03CA91|$0F:$CA81:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CA94|$0F:$CA84:02
; indirect data load target
0x03CA95|$0F:$CA85:07

; data -> code
0x03CA96|$0F:$CA86:D0 09   	BNE $CA91  
; control flow target (from $CA78, $CA7F)
0x03CA98|$0F:$CA88:A9 FF   	LDA #$FF   
0x03CA9A|$0F:$CA8A:8D 61 05	STA $0561  	; NPC #$04 sprite ID
0x03CA9D|$0F:$CA8D:A9 04   	LDA #$04   
0x03CA9F|$0F:$CA8F:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
; control flow target (from $CA86, $CA9C, $CAA3)
0x03CAA1|$0F:$CA91:4C 00 C7	JMP $C700  

; control flow target (from $CA71)
0x03CAA4|$0F:$CA94:C9 04   	CMP #$04   
0x03CAA6|$0F:$CA96:D0 1B   	BNE $CAB3  
0x03CAA8|$0F:$CA98:A5 31   	LDA $31    	; current map ID
0x03CAAA|$0F:$CA9A:C9 03   	CMP #$03   	; Map ID #$03: Midenhall 1F
0x03CAAC|$0F:$CA9C:D0 F3   	BNE $CA91  
0x03CAAE|$0F:$CA9E:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CAB1|$0F:$CAA1:0F
; indirect data load target
0x03CAB2|$0F:$CAA2:02

; data -> code
0x03CAB3|$0F:$CAA3:D0 EC   	BNE $CA91  
0x03CAB5|$0F:$CAA5:20 EA F6	JSR $F6EA  	; open main dialogue window and display string ID specified by byte following JSR

; code -> data
; indirect data load target
0x03CAB8|$0F:$CAA8:75	; String ID #$0075: ‘Open the treasure chest and prepare for thy journey[.’][wait][line]‘Now listen closely, [name][.’][wait][line]‘Seek out worthy companions along thy road[.’][wait][line]‘In Cannock and Moonbrooke there are those who are also of Erdrick's line[.’][wait][line]‘They will surely help thee to defeat Hargon's dark plot[.’][end-FC]

; data -> code
0x03CAB9|$0F:$CAA9:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03CABC|$0F:$CAAC:A9 05   	LDA #$05   
0x03CABE|$0F:$CAAE:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CAC0|$0F:$CAB0:4C 00 C7	JMP $C700  

; control flow target (from $CA96)
0x03CAC3|$0F:$CAB3:C9 05   	CMP #$05   
0x03CAC5|$0F:$CAB5:D0 4B   	BNE $CB02  
0x03CAC7|$0F:$CAB7:4C 00 C7	JMP $C700  

; external control flow target (from $06:$91C0)
0x03CACA|$0F:$CABA:20 B4 E6	JSR $E6B4  
0x03CACD|$0F:$CABD:20 B4 E6	JSR $E6B4  
0x03CAD0|$0F:$CAC0:20 B4 E6	JSR $E6B4  
0x03CAD3|$0F:$CAC3:20 58 D0	JSR $D058  
0x03CAD6|$0F:$CAC6:A9 0A   	LDA #$0A   
0x03CAD8|$0F:$CAC8:99 2A 05	STA $052A,Y
0x03CADB|$0F:$CACB:A9 09   	LDA #$09   
0x03CADD|$0F:$CACD:99 2B 05	STA $052B,Y
0x03CAE0|$0F:$CAD0:A9 87   	LDA #$87   	; Music ID #$87: hit 2 SFX
0x03CAE2|$0F:$CAD2:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03CAE5|$0F:$CAD5:A9 F8   	LDA #$F8   
0x03CAE7|$0F:$CAD7:85 18   	STA $18    
0x03CAE9|$0F:$CAD9:A9 00   	LDA #$00   
0x03CAEB|$0F:$CADB:85 19   	STA $19    
0x03CAED|$0F:$CADD:85 1E   	STA $1E    
0x03CAEF|$0F:$CADF:85 1C   	STA $1C    
0x03CAF1|$0F:$CAE1:20 C5 DE	JSR $DEC5  
0x03CAF4|$0F:$CAE4:A2 0A   	LDX #$0A   
0x03CAF6|$0F:$CAE6:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03CAF9|$0F:$CAE9:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CAFC|$0F:$CAEC:85
; indirect data load target
0x03CAFD|$0F:$CAED:21
; indirect data load target
0x03CAFE|$0F:$CAEE:4F 80	; $07:$804F; motion script for Saber Lion, Osterfair

; data -> code
0x03CB00|$0F:$CAF0:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03CB03|$0F:$CAF3:A9 FF   	LDA #$FF   
0x03CB05|$0F:$CAF5:8D 81 05	STA $0581  	; NPC #$08 sprite ID
0x03CB08|$0F:$CAF8:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CB0A|$0F:$CAFA:A9 02   	LDA #$02   	; Fixed Battle #$02: 1 Saber Lion (Map ID #$0F: Osterfair)
0x03CB0C|$0F:$CAFC:20 5C D2	JSR $D25C  	; trigger fixed battle A
0x03CB0F|$0F:$CAFF:4C FB D2	JMP $D2FB  	; load ROM bank 6

; control flow target (from $CAB5)
0x03CB12|$0F:$CB02:C9 09   	CMP #$09   
0x03CB14|$0F:$CB04:D0 36   	BNE $CB3C  
0x03CB16|$0F:$CB06:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CB19|$0F:$CB09:13
; indirect data load target
0x03CB1A|$0F:$CB0A:08

; data -> code
0x03CB1B|$0F:$CB0B:D0 09   	BNE $CB16  
0x03CB1D|$0F:$CB0D:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CB20|$0F:$CB10:85
; indirect data load target
0x03CB21|$0F:$CB11:20
; indirect data load target
0x03CB22|$0F:$CB12:55 80	; $07:$8055; motion script for Cannock and Moonbrooke, ending part 3, dog in Zahan, triggered from right

; data -> code
0x03CB24|$0F:$CB14:90 15   	BCC $CB2B  
; control flow target (from $CB0B)
0x03CB26|$0F:$CB16:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CB29|$0F:$CB19:12
; indirect data load target
0x03CB2A|$0F:$CB1A:07

; data -> code
0x03CB2B|$0F:$CB1B:F0 07   	BEQ $CB24  
0x03CB2D|$0F:$CB1D:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CB30|$0F:$CB20:11
; indirect data load target
0x03CB31|$0F:$CB21:08

; data -> code
0x03CB32|$0F:$CB22:D0 15   	BNE $CB39  
; control flow target (from $CB1B)
0x03CB34|$0F:$CB24:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CB37|$0F:$CB27:85
; indirect data load target
0x03CB38|$0F:$CB28:21
; indirect data load target
0x03CB39|$0F:$CB29:51 80	; $07:$8051; motion script for dog in Zahan, triggered from left/top

; data -> code
; control flow target (from $CB14)
0x03CB3B|$0F:$CB2B:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03CB3E|$0F:$CB2E:20 F6 F6	JSR $F6F6  	; open main dialogue window and display string ID specified by byte following JSR + #$0200

; code -> data
; indirect data load target
0x03CB41|$0F:$CB31:D0	; String ID #$02D0: ‘Bow-wow-wow!’[end-FC]

; data -> code
0x03CB42|$0F:$CB32:A9 FF   	LDA #$FF   
0x03CB44|$0F:$CB34:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CB46|$0F:$CB36:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
; control flow target (from $CB22, $CB52)
0x03CB49|$0F:$CB39:4C 00 C7	JMP $C700  

; control flow target (from $CB04)
0x03CB4C|$0F:$CB3C:C9 0A   	CMP #$0A   
0x03CB4E|$0F:$CB3E:D0 22   	BNE $CB62  
0x03CB50|$0F:$CB40:A5 31   	LDA $31    	; current map ID
0x03CB52|$0F:$CB42:C9 56   	CMP #$56   	; Map ID #$56: Lighthouse 7F
0x03CB54|$0F:$CB44:D0 19   	BNE $CB5F  
0x03CB56|$0F:$CB46:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CB59|$0F:$CB49:0A
; indirect data load target
0x03CB5A|$0F:$CB4A:04

; data -> code
0x03CB5B|$0F:$CB4B:F0 07   	BEQ $CB54  
0x03CB5D|$0F:$CB4D:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CB60|$0F:$CB50:0B
; indirect data load target
0x03CB61|$0F:$CB51:04

; data -> code
0x03CB62|$0F:$CB52:D0 E5   	BNE $CB39  
; control flow target (from $CB4B)
0x03CB64|$0F:$CB54:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CB67|$0F:$CB57:81
; indirect data load target
0x03CB68|$0F:$CB58:22
; indirect data load target
0x03CB69|$0F:$CB59:4A 80	; $07:$804A; motion script for King Midenhall, Lighthouse Wizard part 1

; data -> code
0x03CB6B|$0F:$CB5B:A9 0B   	LDA #$0B   
0x03CB6D|$0F:$CB5D:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
; control flow target (from $CB44, $CB6B, $CB76, $CB80, $CB8E)
0x03CB6F|$0F:$CB5F:4C 00 C7	JMP $C700  

; control flow target (from $CB3E)
0x03CB72|$0F:$CB62:C9 0B   	CMP #$0B   
0x03CB74|$0F:$CB64:D0 12   	BNE $CB78  
0x03CB76|$0F:$CB66:AD 60 05	LDA $0560  	; NPC #$04 motion nybble + direction nybble
0x03CB79|$0F:$CB69:29 F0   	AND #$F0   
0x03CB7B|$0F:$CB6B:D0 F2   	BNE $CB5F  
0x03CB7D|$0F:$CB6D:A9 FF   	LDA #$FF   
0x03CB7F|$0F:$CB6F:8D 61 05	STA $0561  	; NPC #$04 sprite ID
0x03CB82|$0F:$CB72:A9 0C   	LDA #$0C   
0x03CB84|$0F:$CB74:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CB86|$0F:$CB76:D0 E7   	BNE $CB5F  
; control flow target (from $CB64)
0x03CB88|$0F:$CB78:C9 0C   	CMP #$0C   
0x03CB8A|$0F:$CB7A:D0 29   	BNE $CBA5  
0x03CB8C|$0F:$CB7C:A5 31   	LDA $31    	; current map ID
0x03CB8E|$0F:$CB7E:C9 56   	CMP #$56   	; Map ID #$56: Lighthouse 7F
0x03CB90|$0F:$CB80:D0 DD   	BNE $CB5F  
0x03CB92|$0F:$CB82:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CB95|$0F:$CB85:0E
; indirect data load target
0x03CB96|$0F:$CB86:09

; data -> code
0x03CB97|$0F:$CB87:F0 07   	BEQ $CB90  
0x03CB99|$0F:$CB89:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CB9C|$0F:$CB8C:0F
; indirect data load target
0x03CB9D|$0F:$CB8D:09

; data -> code
0x03CB9E|$0F:$CB8E:D0 CF   	BNE $CB5F  
; control flow target (from $CB87)
0x03CBA0|$0F:$CB90:20 EA F6	JSR $F6EA  	; open main dialogue window and display string ID specified by byte following JSR

; code -> data
; indirect data load target
0x03CBA3|$0F:$CB93:66	; String ID #$0066: ‘Thou need not speak for I know thy mind well[.’][wait][line]‘Come, follow me[.’][wait][line]‘I will guide thee to the place where thou shall find the Crest[.’][end-FC]

; data -> code
0x03CBA4|$0F:$CB94:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03CBA7|$0F:$CB97:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CBAA|$0F:$CB9A:80
; indirect data load target
0x03CBAB|$0F:$CB9B:22
; indirect data load target
0x03CBAC|$0F:$CB9C:59 80	; $07:$8059; motion script for Lighthouse Wizard part 2

; data -> code
0x03CBAE|$0F:$CB9E:A9 0D   	LDA #$0D   
0x03CBB0|$0F:$CBA0:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CBB2|$0F:$CBA2:4C 00 C7	JMP $C700  

; control flow target (from $CB7A)
0x03CBB5|$0F:$CBA5:A0 00   	LDY #$00   
; control flow target (from $CBE2)
0x03CBB7|$0F:$CBA7:D9 AF CC	CMP $CCAF,Y
0x03CBBA|$0F:$CBAA:D0 33   	BNE $CBDF  
0x03CBBC|$0F:$CBAC:A5 31   	LDA $31    	; current map ID
0x03CBBE|$0F:$CBAE:D9 B4 CC	CMP $CCB4,Y
0x03CBC1|$0F:$CBB1:D0 29   	BNE $CBDC  
0x03CBC3|$0F:$CBB3:A5 16   	LDA $16    	; current map X-pos (1)
0x03CBC5|$0F:$CBB5:D9 B9 CC	CMP $CCB9,Y
0x03CBC8|$0F:$CBB8:90 22   	BCC $CBDC  
0x03CBCA|$0F:$CBBA:D9 BE CC	CMP $CCBE,Y
0x03CBCD|$0F:$CBBD:B0 1D   	BCS $CBDC  
0x03CBCF|$0F:$CBBF:A5 17   	LDA $17    	; current map Y-pos (1)
0x03CBD1|$0F:$CBC1:D9 C3 CC	CMP $CCC3,Y
0x03CBD4|$0F:$CBC4:90 16   	BCC $CBDC  
0x03CBD6|$0F:$CBC6:D9 C8 CC	CMP $CCC8,Y
0x03CBD9|$0F:$CBC9:B0 11   	BCS $CBDC  
0x03CBDB|$0F:$CBCB:AD 58 05	LDA $0558  	; NPC #$03 motion nybble + direction nybble
0x03CBDE|$0F:$CBCE:29 F0   	AND #$F0   
0x03CBE0|$0F:$CBD0:D0 0A   	BNE $CBDC  
0x03CBE2|$0F:$CBD2:A9 FF   	LDA #$FF   
0x03CBE4|$0F:$CBD4:8D 59 05	STA $0559  	; NPC #$03 sprite ID
0x03CBE7|$0F:$CBD7:B9 CD CC	LDA $CCCD,Y
0x03CBEA|$0F:$CBDA:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
; control flow target (from $CBB1, $CBB8, $CBBD, $CBC4, $CBC9, $CBD0, $CBEC, $CBFA)
0x03CBEC|$0F:$CBDC:4C 00 C7	JMP $C700  

; control flow target (from $CBAA)
0x03CBEF|$0F:$CBDF:C8      	INY        
0x03CBF0|$0F:$CBE0:C0 05   	CPY #$05   
0x03CBF2|$0F:$CBE2:D0 C3   	BNE $CBA7  
0x03CBF4|$0F:$CBE4:C9 17   	CMP #$17   
0x03CBF6|$0F:$CBE6:D0 78   	BNE $CC60  
0x03CBF8|$0F:$CBE8:A5 31   	LDA $31    	; current map ID
0x03CBFA|$0F:$CBEA:C9 51   	CMP #$51   	; Map ID #$51: Lighthouse 2F
0x03CBFC|$0F:$CBEC:D0 EE   	BNE $CBDC  
0x03CBFE|$0F:$CBEE:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CC01|$0F:$CBF1:1C
; indirect data load target
0x03CC02|$0F:$CBF2:1F

; data -> code
0x03CC03|$0F:$CBF3:F0 07   	BEQ $CBFC  
0x03CC05|$0F:$CBF5:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CC08|$0F:$CBF8:1D
; indirect data load target
0x03CC09|$0F:$CBF9:1F

; data -> code
0x03CC0A|$0F:$CBFA:D0 E0   	BNE $CBDC  
; control flow target (from $CBF3)
0x03CC0C|$0F:$CBFC:20 EA F6	JSR $F6EA  	; open main dialogue window and display string ID specified by byte following JSR

; code -> data
; indirect data load target
0x03CC0F|$0F:$CBFF:67	; String ID #$0067: ‘Open now the treasure chest[.’][end-FC]

; data -> code
0x03CC10|$0F:$CC00:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03CC13|$0F:$CC03:A9 1B   	LDA #$1B   
0x03CC15|$0F:$CC05:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CC17|$0F:$CC07:4C 00 C7	JMP $C700  

; trigger Stars Crest battle
; external control flow target (from $06:$9BA0)
0x03CC1A|$0F:$CC0A:20 2A FA	JSR $FA2A  	; display string ID specified by next byte

; code -> data
; indirect data load target
0x03CC1D|$0F:$CC0D:69	; String ID #$0069: [wait]‘Haha! Into my trap thou hast stepped! It shall be thy last[.’][end-FC]

; data -> code
0x03CC1E|$0F:$CC0E:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03CC21|$0F:$CC11:A9 05   	LDA #$05   
0x03CC23|$0F:$CC13:A0 2F   	LDY #$2F   
0x03CC25|$0F:$CC15:20 5C CD	JSR $CD5C  
0x03CC28|$0F:$CC18:A9 05   	LDA #$05   
0x03CC2A|$0F:$CC1A:A0 27   	LDY #$27   
0x03CC2C|$0F:$CC1C:20 5C CD	JSR $CD5C  
0x03CC2F|$0F:$CC1F:A9 05   	LDA #$05   
0x03CC31|$0F:$CC21:A0 37   	LDY #$37   
0x03CC33|$0F:$CC23:20 5C CD	JSR $CD5C  
0x03CC36|$0F:$CC26:A9 FF   	LDA #$FF   
0x03CC38|$0F:$CC28:8D 59 05	STA $0559  	; NPC #$03 sprite ID
0x03CC3B|$0F:$CC2B:8D 61 05	STA $0561  	; NPC #$04 sprite ID
0x03CC3E|$0F:$CC2E:8D 69 05	STA $0569  	; NPC #$05 sprite ID
0x03CC41|$0F:$CC31:8D 71 05	STA $0571  	; NPC #$06 sprite ID
0x03CC44|$0F:$CC34:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CC46|$0F:$CC36:A9 05   	LDA #$05   	; Fixed Battle #$05: 4 Gremlins (Map ID #$51: Lighthouse 2F)
0x03CC48|$0F:$CC38:20 5C D2	JSR $D25C  	; trigger fixed battle A
0x03CC4B|$0F:$CC3B:A5 98   	LDA $98    	; outcome of last fight?
0x03CC4D|$0F:$CC3D:C9 FC   	CMP #$FC   
0x03CC4F|$0F:$CC3F:F0 1B   	BEQ $CC5C  
0x03CC51|$0F:$CC41:AD 12 01	LDA $0112  	; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun)
0x03CC54|$0F:$CC44:29 02   	AND #$02   
0x03CC56|$0F:$CC46:D0 14   	BNE $CC5C  
0x03CC58|$0F:$CC48:A2 46   	LDX #$46   
0x03CC5A|$0F:$CC4A:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03CC5D|$0F:$CC4D:20 F6 F6	JSR $F6F6  	; open main dialogue window and display string ID specified by byte following JSR + #$0200

; code -> data
; indirect data load target
0x03CC60|$0F:$CC50:32	; String ID #$0232: Thou hast found the Stars Crest.[end-FC]

; data -> code
0x03CC61|$0F:$CC51:AD 12 01	LDA $0112  	; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun)
0x03CC64|$0F:$CC54:09 02   	ORA #$02   
0x03CC66|$0F:$CC56:8D 12 01	STA $0112  	; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun)
0x03CC69|$0F:$CC59:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
; control flow target (from $CC3F, $CC46)
0x03CC6C|$0F:$CC5C:60      	RTS        

; control flow target (from $CC70, $CC99)
0x03CC6D|$0F:$CC5D:4C 00 C7	JMP $C700  

; control flow target (from $CBE6)
0x03CC70|$0F:$CC60:C9 18   	CMP #$18   
0x03CC72|$0F:$CC62:D0 33   	BNE $CC97  
0x03CC74|$0F:$CC64:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CC77|$0F:$CC67:10
; indirect data load target
0x03CC78|$0F:$CC68:0C

; data -> code
0x03CC79|$0F:$CC69:F0 07   	BEQ $CC72  
0x03CC7B|$0F:$CC6B:20 26 CD	JSR $CD26  	; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes

; code -> data
; indirect data load target
0x03CC7E|$0F:$CC6E:10
; indirect data load target
0x03CC7F|$0F:$CC6F:0D

; data -> code
0x03CC80|$0F:$CC70:D0 EB   	BNE $CC5D  
; control flow target (from $CC69)
0x03CC82|$0F:$CC72:20 EA F6	JSR $F6EA  	; open main dialogue window and display string ID specified by byte following JSR

; code -> data
; indirect data load target
0x03CC85|$0F:$CC75:6C	; String ID #$006C: ‘Such rudeness in a Wizard's Home is not acceptable[.’][wait][line]‘Perhaps I should turn thee into a frog!’[end-FC]

; data -> code
0x03CC86|$0F:$CC76:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03CC89|$0F:$CC79:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CC8C|$0F:$CC7C:81
; indirect data load target
0x03CC8D|$0F:$CC7D:23
; indirect data load target
0x03CC8E|$0F:$CC7E:CB 80	; $07:$80CB; motion script for Evil Clown #1, Sea Cave B5

; data -> code
0x03CC90|$0F:$CC80:A9 05   	LDA #$05   
0x03CC92|$0F:$CC82:8D 61 05	STA $0561  	; NPC #$04 sprite ID
0x03CC95|$0F:$CC85:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03CC98|$0F:$CC88:A9 FF   	LDA #$FF   
0x03CC9A|$0F:$CC8A:8D 59 05	STA $0559  	; NPC #$03 sprite ID
0x03CC9D|$0F:$CC8D:8D 61 05	STA $0561  	; NPC #$04 sprite ID
0x03CCA0|$0F:$CC90:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CCA2|$0F:$CC92:A9 06   	LDA #$06   	; Fixed Battle #$06: 2 Evil Clown (Map ID #$33: Sea Cave B5)
0x03CCA4|$0F:$CC94:20 5C D2	JSR $D25C  	; trigger fixed battle A
; control flow target (from $CC62)
0x03CCA7|$0F:$CC97:C9 64   	CMP #$64   
0x03CCA9|$0F:$CC99:D0 C2   	BNE $CC5D  
0x03CCAB|$0F:$CC9B:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03CCAE|$0F:$CC9E:A0	; $06:$8040

; data -> code
0x03CCAF|$0F:$CC9F:4C 00 C7	JMP $C700  

; external control flow target (from $06:$90C6)
0x03CCB2|$0F:$CCA2:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CCB5|$0F:$CCA5:89
; indirect data load target
0x03CCB6|$0F:$CCA6:20
; indirect data load target
0x03CCB7|$0F:$CCA7:40 80	; $07:$8040; motion script for grandfather in Lianport, part 3

; data -> code
0x03CCB9|$0F:$CCA9:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03CCBC|$0F:$CCAC:4C 61 F7	JMP $F761  	; load ROM bank #$06


; code -> data
; indexed data load target (from $CBA7)
0x03CCBF|$0F:$CCAF:0D
0x03CCC0|$0F:$CCB0:0F
0x03CCC1|$0F:$CCB1:11
0x03CCC2|$0F:$CCB2:13
0x03CCC3|$0F:$CCB3:15
; indexed data load target (from $CBAE)
; indirect data load target
0x03CCC4|$0F:$CCB4:56	; Map ID #$56: Lighthouse 7F
; indirect data load target
0x03CCC5|$0F:$CCB5:55	; Map ID #$55: Lighthouse 6F
; indirect data load target
0x03CCC6|$0F:$CCB6:54	; Map ID #$54: Lighthouse 5F
; indirect data load target
0x03CCC7|$0F:$CCB7:53	; Map ID #$53: Lighthouse 4F
; indirect data load target
0x03CCC8|$0F:$CCB8:52	; Map ID #$52: Lighthouse 3F
; indexed data load target (from $CBB5)
; indirect data load target
0x03CCC9|$0F:$CCB9:00
; indirect data load target
0x03CCCA|$0F:$CCBA:10
; indirect data load target
0x03CCCB|$0F:$CCBB:1A
; indirect data load target
0x03CCCC|$0F:$CCBC:16
; indirect data load target
0x03CCCD|$0F:$CCBD:1E
; indexed data load target (from $CBBA)
; indirect data load target
0x03CCCE|$0F:$CCBE:03
; indirect data load target
0x03CCCF|$0F:$CCBF:14
; indirect data load target
0x03CCD0|$0F:$CCC0:1C
; indirect data load target
0x03CCD1|$0F:$CCC1:19
; indirect data load target
0x03CCD2|$0F:$CCC2:20
; indexed data load target (from $CBC1)
; indirect data load target
0x03CCD3|$0F:$CCC3:11
; indirect data load target
0x03CCD4|$0F:$CCC4:1A
; indirect data load target
0x03CCD5|$0F:$CCC5:0E
; indirect data load target
0x03CCD6|$0F:$CCC6:19
; indirect data load target
0x03CCD7|$0F:$CCC7:16
; indexed data load target (from $CBC6)
; indirect data load target
0x03CCD8|$0F:$CCC8:14
; indirect data load target
0x03CCD9|$0F:$CCC9:1C
; indirect data load target
0x03CCDA|$0F:$CCCA:12
; indirect data load target
0x03CCDB|$0F:$CCCB:1C
; indirect data load target
0x03CCDC|$0F:$CCCC:1A
; indexed data load target (from $CBD7)
; indirect data load target
0x03CCDD|$0F:$CCCD:0E
; indirect data load target
0x03CCDE|$0F:$CCCE:10
; indirect data load target
0x03CCDF|$0F:$CCCF:12
; indirect data load target
0x03CCE0|$0F:$CCD0:14
; indirect data load target
0x03CCE1|$0F:$CCD1:16

; data -> code
; execute scripted motion
; control flow target (from $C836, $C864, $C93D, $C959, $CA0C, $CA32, $CA43, $CAF0, $CB2B, $CC85, $CCA9, $CCE7, $FF84)
; external control flow target (from $06:$BB3A)
0x03CCE2|$0F:$CCD2:A5 35   	LDA $35    	; flag indicating whether any menu is currently open
0x03CCE4|$0F:$CCD4:48      	PHA        
0x03CCE5|$0F:$CCD5:A9 00   	LDA #$00   
0x03CCE7|$0F:$CCD7:85 35   	STA $35    	; flag indicating whether any menu is currently open
; control flow target (from $CCE1)
0x03CCE9|$0F:$CCD9:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03CCEC|$0F:$CCDC:20 CB D8	JSR $D8CB  
0x03CCEF|$0F:$CCDF:A5 38   	LDA $38    
0x03CCF1|$0F:$CCE1:30 F6   	BMI $CCD9  
0x03CCF3|$0F:$CCE3:68      	PLA        
0x03CCF4|$0F:$CCE4:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03CCF6|$0F:$CCE6:60      	RTS        

; external control flow target (from $06:$BB91, $06:$BBA5)
0x03CCF7|$0F:$CCE7:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03CCFA|$0F:$CCEA:A9 06   	LDA #$06   
0x03CCFC|$0F:$CCEC:85 94   	STA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03CCFE|$0F:$CCEE:4C D5 C3	JMP $C3D5  	; save A to $05F6, X to $43, and load bank specified by A

; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)
; control flow target (from $C82F, $C85D, $C932, $C94B, $C952, $C9B2, $C9FC, $CA05, $CA15, $CA22, $CA2B, $CA3C, $CA5F, $CA66, $CAE9, $CB0D, $CB24, $CB54, $CB97, $CC79, $CCA2, $CEC2)
; external control flow target (from $06:$BACC, $06:$BAD5, $06:$BADF, $06:$BB83, $06:$BB8A, $06:$BB97, $06:$BB9E, $07:$822A, $07:$823B, $07:$8271, $07:$82CB, $07:$82EE, $07:$8329, $07:$8358, $07:$836D, $07:$837E, $07:$83F4, $07:$845C, $07:$8495, $07:$84CE, $07:$84EF, $07:$84FC, $07:$8515, $07:$852C, $07:$8559, $07:$8571, $07:$8578, $07:$85B3, $07:$85BA, $07:$85E7)
0x03CD01|$0F:$CCF1:68      	PLA        	; return address low byte
0x03CD02|$0F:$CCF2:85 0C   	STA $0C    	; return address low byte
0x03CD04|$0F:$CCF4:68      	PLA        	; return address high byte
0x03CD05|$0F:$CCF5:85 0D   	STA $0D    	; return address high byte
0x03CD07|$0F:$CCF7:A0 01   	LDY #$01   
0x03CD09|$0F:$CCF9:B1 0C   	LDA ($0C),Y	; data byte 0
0x03CD0B|$0F:$CCFB:85 38   	STA $38    
0x03CD0D|$0F:$CCFD:29 7F   	AND #$7F   	; useless op
0x03CD0F|$0F:$CCFF:0A      	ASL        
0x03CD10|$0F:$CD00:0A      	ASL        
0x03CD11|$0F:$CD01:0A      	ASL        
0x03CD12|$0F:$CD02:AA      	TAX        
0x03CD13|$0F:$CD03:C8      	INY        
0x03CD14|$0F:$CD04:B1 0C   	LDA ($0C),Y	; data byte 1
0x03CD16|$0F:$CD06:9D 58 05	STA $0558,X	; NPC #$03 motion nybble + direction nybble
0x03CD19|$0F:$CD09:C8      	INY        
0x03CD1A|$0F:$CD0A:B1 0C   	LDA ($0C),Y	; data byte 2
0x03CD1C|$0F:$CD0C:9D 52 05	STA $0552,X	; NPC #$02 scripted motion low byte
0x03CD1F|$0F:$CD0F:C8      	INY        
0x03CD20|$0F:$CD10:B1 0C   	LDA ($0C),Y	; data byte 3
0x03CD22|$0F:$CD12:9D 53 05	STA $0553,X	; NPC #$02 scripted motion high byte
0x03CD25|$0F:$CD15:A5 0C   	LDA $0C    	; return address low byte
0x03CD27|$0F:$CD17:18      	CLC        
0x03CD28|$0F:$CD18:69 04   	ADC #$04   	; 4 data bytes
0x03CD2A|$0F:$CD1A:85 0C   	STA $0C    	; return address low byte
0x03CD2C|$0F:$CD1C:A5 0D   	LDA $0D    	; return address high byte
0x03CD2E|$0F:$CD1E:69 00   	ADC #$00   	; add carry from low byte
0x03CD30|$0F:$CD20:48      	PHA        	; return address high byte
0x03CD31|$0F:$CD21:A5 0C   	LDA $0C    	; return address low byte
0x03CD33|$0F:$CD23:48      	PHA        	; return address low byte
0x03CD34|$0F:$CD24:18      	CLC        
0x03CD35|$0F:$CD25:60      	RTS        

; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes
; control flow target (from $C911, $C92B, $C9C7, $C9D2, $C9DD, $CA51, $CA58, $CA73, $CA7A, $CA81, $CA9E, $CB06, $CB16, $CB1D, $CB46, $CB4D, $CB82, $CB89, $CBEE, $CBF5, $CC64, $CC6B)
; external control flow target (from $06:$96B7, $06:$9793, $06:$BB3D)
0x03CD36|$0F:$CD26:68      	PLA        	; original return address, low byte
0x03CD37|$0F:$CD27:85 0C   	STA $0C    	; original return address, low byte
0x03CD39|$0F:$CD29:18      	CLC        
0x03CD3A|$0F:$CD2A:69 02   	ADC #$02   	; calls to this routine are followed by 2 bytes of data
0x03CD3C|$0F:$CD2C:85 0E   	STA $0E    	; new return address, low byte
0x03CD3E|$0F:$CD2E:68      	PLA        	; original return address, high byte
0x03CD3F|$0F:$CD2F:85 0D   	STA $0D    	; original return address, high byte
0x03CD41|$0F:$CD31:69 00   	ADC #$00   	; add carry from low address
0x03CD43|$0F:$CD33:48      	PHA        	; new return address, high byte
0x03CD44|$0F:$CD34:A5 0E   	LDA $0E    	; new return address, low byte
0x03CD46|$0F:$CD36:48      	PHA        	; new return address, low byte
0x03CD47|$0F:$CD37:A0 01   	LDY #$01   	; 1 byte after the original return address
0x03CD49|$0F:$CD39:A5 16   	LDA $16    	; current map X-pos (1)
0x03CD4B|$0F:$CD3B:D1 0C   	CMP ($0C),Y
0x03CD4D|$0F:$CD3D:D0 05   	BNE $CD44  	; not the same X-pos => Z not set
0x03CD4F|$0F:$CD3F:A5 17   	LDA $17    	; current map Y-pos (1)
0x03CD51|$0F:$CD41:C8      	INY        	; 2 bytes after the original return address
0x03CD52|$0F:$CD42:D1 0C   	CMP ($0C),Y	; set or clear Z based on whether your Y-pos matches
; control flow target (from $CD3D)
0x03CD54|$0F:$CD44:60      	RTS        

; external control flow target (from $06:$971D)
0x03CD55|$0F:$CD45:20 51 CD	JSR $CD51  
; control flow target (from $CD4E)
0x03CD58|$0F:$CD48:4C 61 F7	JMP $F761  	; load ROM bank #$06

; external control flow target (from $06:$9724)
0x03CD5B|$0F:$CD4B:20 5C CD	JSR $CD5C  
0x03CD5E|$0F:$CD4E:4C 48 CD	JMP $CD48  

; control flow target (from $CD45)
0x03CD61|$0F:$CD51:85 C9   	STA $C9    
0x03CD63|$0F:$CD53:84 97   	STY $97    	; subject hero ID $97
0x03CD65|$0F:$CD55:A9 FF   	LDA #$FF   
0x03CD67|$0F:$CD57:85 96   	STA $96    	; temp storage for item/spell/type/etc. IDs
0x03CD69|$0F:$CD59:4C 64 CD	JMP $CD64  

; control flow target (from $CC15, $CC1C, $CC23, $CD4B)
0x03CD6C|$0F:$CD5C:85 96   	STA $96    	; temp storage for item/spell/type/etc. IDs
0x03CD6E|$0F:$CD5E:84 97   	STY $97    	; subject hero ID $97
0x03CD70|$0F:$CD60:A9 FF   	LDA #$FF   
0x03CD72|$0F:$CD62:85 C9   	STA $C9    
; control flow target (from $CD59)
0x03CD74|$0F:$CD64:A9 01   	LDA #$01   
0x03CD76|$0F:$CD66:85 49   	STA $49    	; object hero/target/item/string ID $49
; control flow target (from $CD8C)
0x03CD78|$0F:$CD68:A5 C9   	LDA $C9    
0x03CD7A|$0F:$CD6A:A4 97   	LDY $97    	; subject hero ID $97
0x03CD7C|$0F:$CD6C:99 3A 05	STA $053A,Y
0x03CD7F|$0F:$CD6F:20 CB D8	JSR $D8CB  
0x03CD82|$0F:$CD72:A2 04   	LDX #$04   
0x03CD84|$0F:$CD74:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03CD87|$0F:$CD77:A5 96   	LDA $96    	; temp storage for item/spell/type/etc. IDs
0x03CD89|$0F:$CD79:A4 97   	LDY $97    	; subject hero ID $97
0x03CD8B|$0F:$CD7B:99 3A 05	STA $053A,Y
0x03CD8E|$0F:$CD7E:20 CB D8	JSR $D8CB  
0x03CD91|$0F:$CD81:A6 49   	LDX $49    	; object hero/target/item/string ID $49
0x03CD93|$0F:$CD83:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03CD96|$0F:$CD86:E6 49   	INC $49    	; object hero/target/item/string ID $49
0x03CD98|$0F:$CD88:A5 49   	LDA $49    	; object hero/target/item/string ID $49
0x03CD9A|$0F:$CD8A:C9 08   	CMP #$08   
0x03CD9C|$0F:$CD8C:90 DA   	BCC $CD68  
0x03CD9E|$0F:$CD8E:60      	RTS        

; control flow target (from $E56C)
0x03CD9F|$0F:$CD8F:A5 31   	LDA $31    	; current map ID
0x03CDA1|$0F:$CD91:C9 01   	CMP #$01   	; Map ID #$01: World Map
0x03CDA3|$0F:$CD93:D0 05   	BNE $CD9A  
; control flow target (from $CDAA, $CDB8)
0x03CDA5|$0F:$CD95:A9 FF   	LDA #$FF   
0x03CDA7|$0F:$CD97:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CDA9|$0F:$CD99:60      	RTS        

; control flow target (from $CD93)
0x03CDAA|$0F:$CD9A:C9 0B   	CMP #$0B   	; Map ID #$0B: Lianport
0x03CDAC|$0F:$CD9C:D0 13   	BNE $CDB1  
0x03CDAE|$0F:$CD9E:A5 CF   	LDA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03CDB0|$0F:$CDA0:F0 0A   	BEQ $CDAC  
0x03CDB2|$0F:$CDA2:A9 FF   	LDA #$FF   
0x03CDB4|$0F:$CDA4:8D 89 05	STA $0589  	; NPC #$09 sprite ID
0x03CDB7|$0F:$CDA7:8D 91 05	STA $0591  	; NPC #$0A sprite ID
0x03CDBA|$0F:$CDAA:D0 E9   	BNE $CD95  
; control flow target (from $CDA0)
0x03CDBC|$0F:$CDAC:A9 00   	LDA #$00   
0x03CDBE|$0F:$CDAE:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CDC0|$0F:$CDB0:60      	RTS        

; control flow target (from $CD9C)
0x03CDC1|$0F:$CDB1:C9 1A   	CMP #$1A   	; Map ID #$1A: Shrine SW of Cannock
0x03CDC3|$0F:$CDB3:D0 0A   	BNE $CDBF  
0x03CDC5|$0F:$CDB5:20 CE F6	JSR $F6CE  	; return number of party members - 1 in A/X
0x03CDC8|$0F:$CDB8:D0 DB   	BNE $CD95  
0x03CDCA|$0F:$CDBA:A9 02   	LDA #$02   
0x03CDCC|$0F:$CDBC:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CDCE|$0F:$CDBE:60      	RTS        

; control flow target (from $CDB3)
0x03CDCF|$0F:$CDBF:C9 02   	CMP #$02   	; Map ID #$02: Midenhall 2F
0x03CDD1|$0F:$CDC1:D0 10   	BNE $CDD3  
0x03CDD3|$0F:$CDC3:A5 44   	LDA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CDD5|$0F:$CDC5:C9 04   	CMP #$04   
0x03CDD7|$0F:$CDC7:F0 04   	BEQ $CDCD  
0x03CDD9|$0F:$CDC9:C9 05   	CMP #$05   
0x03CDDB|$0F:$CDCB:D0 29   	BNE $CDF6  
; control flow target (from $CDC7)
0x03CDDD|$0F:$CDCD:A9 FF   	LDA #$FF   
0x03CDDF|$0F:$CDCF:8D 61 05	STA $0561  	; NPC #$04 sprite ID
0x03CDE2|$0F:$CDD2:60      	RTS        

; control flow target (from $CDC1)
0x03CDE3|$0F:$CDD3:C9 03   	CMP #$03   	; Map ID #$03: Midenhall 1F
0x03CDE5|$0F:$CDD5:D0 24   	BNE $CDFB  
0x03CDE7|$0F:$CDD7:A5 44   	LDA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CDE9|$0F:$CDD9:C9 04   	CMP #$04   
0x03CDEB|$0F:$CDDB:F0 18   	BEQ $CDF5  
0x03CDED|$0F:$CDDD:C9 05   	CMP #$05   
0x03CDEF|$0F:$CDDF:F0 14   	BEQ $CDF5  
0x03CDF1|$0F:$CDE1:A9 FF   	LDA #$FF   
0x03CDF3|$0F:$CDE3:8D C1 05	STA $05C1  	; NPC #$10 sprite ID
0x03CDF6|$0F:$CDE6:AD AD 61	LDA $61AD  
0x03CDF9|$0F:$CDE9:D0 0A   	BNE $CDF5  
0x03CDFB|$0F:$CDEB:A9 0E   	LDA #$0E   
0x03CDFD|$0F:$CDED:8D 1A 05	STA $051A  	; something to do with whether you've opened the chest containing the Shield of Erdrick
0x03CE00|$0F:$CDF0:A9 02   	LDA #$02   
0x03CE02|$0F:$CDF2:8D 1B 05	STA $051B  
; control flow target (from $CDDB, $CDDF, $CDE9)
0x03CE05|$0F:$CDF5:60      	RTS        

; control flow target (from $CDCB, $CE0A)
0x03CE06|$0F:$CDF6:A9 FF   	LDA #$FF   
0x03CE08|$0F:$CDF8:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CE0A|$0F:$CDFA:60      	RTS        

; control flow target (from $CDD5)
0x03CE0B|$0F:$CDFB:C9 05   	CMP #$05   	; Map ID #$05: Leftwyne
0x03CE0D|$0F:$CDFD:D0 13   	BNE $CE12  
0x03CE0F|$0F:$CDFF:AD 3F 06	LDA $063F  	; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03CE12|$0F:$CE02:29 04   	AND #$04   
0x03CE14|$0F:$CE04:D0 06   	BNE $CE0C  
0x03CE16|$0F:$CE06:A5 CA   	LDA $CA    	; Cannock runaround quest status (0 = start of game, 0 -> 1 = talked to King Cannock, 1 -> 2 = said YES to seeking Cannock in Spring of Bravery, 2 -> 3 = talked to King Midenhall; adding Cannock sets this to 3; some code checks for 4)
0x03CE18|$0F:$CE08:C9 02   	CMP #$02   
0x03CE1A|$0F:$CE0A:B0 EA   	BCS $CDF6  
; control flow target (from $CE04)
0x03CE1C|$0F:$CE0C:A9 FF   	LDA #$FF   
0x03CE1E|$0F:$CE0E:8D C1 05	STA $05C1  	; NPC #$10 sprite ID
0x03CE21|$0F:$CE11:60      	RTS        

; control flow target (from $CDFD)
0x03CE22|$0F:$CE12:C9 0F   	CMP #$0F   	; Map ID #$0F: Osterfair
0x03CE24|$0F:$CE14:D0 05   	BNE $CE1B  
0x03CE26|$0F:$CE16:A9 00   	LDA #$00   
0x03CE28|$0F:$CE18:85 98   	STA $98    	; outcome of last fight?
0x03CE2A|$0F:$CE1A:60      	RTS        

; control flow target (from $CE14)
0x03CE2B|$0F:$CE1B:C9 10   	CMP #$10   	; Map ID #$10: Zahan
0x03CE2D|$0F:$CE1D:D0 05   	BNE $CE24  
0x03CE2F|$0F:$CE1F:A9 09   	LDA #$09   
0x03CE31|$0F:$CE21:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CE33|$0F:$CE23:60      	RTS        

; control flow target (from $CE1D)
0x03CE34|$0F:$CE24:C9 20   	CMP #$20   	; Map ID #$20: Shrine SW of Moonbrooke
0x03CE36|$0F:$CE26:D0 18   	BNE $CE40  
0x03CE38|$0F:$CE28:A0 00   	LDY #$00   
; control flow target (from $CE38)
0x03CE3A|$0F:$CE2A:B9 2D 06	LDA $062D,Y	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03CE3D|$0F:$CE2D:29 04   	AND #$04   
0x03CE3F|$0F:$CE2F:F0 0E   	BEQ $CE3F  
0x03CE41|$0F:$CE31:98      	TYA        
0x03CE42|$0F:$CE32:18      	CLC        
0x03CE43|$0F:$CE33:69 12   	ADC #$12   
0x03CE45|$0F:$CE35:A8      	TAY        
0x03CE46|$0F:$CE36:C9 36   	CMP #$36   
0x03CE48|$0F:$CE38:D0 F0   	BNE $CE2A  
0x03CE4A|$0F:$CE3A:A9 06   	LDA #$06   
0x03CE4C|$0F:$CE3C:8D 54 05	STA $0554  	; NPC #$03 X-pos
; control flow target (from $CE2F)
0x03CE4F|$0F:$CE3F:60      	RTS        

; control flow target (from $CE26)
0x03CE50|$0F:$CE40:C9 57   	CMP #$57   	; Map ID #$57: Lighthouse 8F
0x03CE52|$0F:$CE42:D0 01   	BNE $CE45  
0x03CE54|$0F:$CE44:60      	RTS        

; control flow target (from $CE42)
0x03CE55|$0F:$CE45:C9 56   	CMP #$56   	; Map ID #$56: Lighthouse 7F
0x03CE57|$0F:$CE47:D0 3E   	BNE $CE87  
0x03CE59|$0F:$CE49:AD 12 01	LDA $0112  	; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun)
0x03CE5C|$0F:$CE4C:29 02   	AND #$02   
0x03CE5E|$0F:$CE4E:D0 2C   	BNE $CE7C  
0x03CE60|$0F:$CE50:A5 44   	LDA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CE62|$0F:$CE52:C9 FF   	CMP #$FF   
0x03CE64|$0F:$CE54:F0 04   	BEQ $CE5A  
0x03CE66|$0F:$CE56:C9 0A   	CMP #$0A   
0x03CE68|$0F:$CE58:D0 05   	BNE $CE5F  
; control flow target (from $CE54)
0x03CE6A|$0F:$CE5A:A9 0A   	LDA #$0A   
0x03CE6C|$0F:$CE5C:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CE6E|$0F:$CE5E:60      	RTS        

; control flow target (from $CE58)
0x03CE6F|$0F:$CE5F:C9 0B   	CMP #$0B   
0x03CE71|$0F:$CE61:F0 1E   	BEQ $CE81  
0x03CE73|$0F:$CE63:C9 0C   	CMP #$0C   
0x03CE75|$0F:$CE65:F0 1A   	BEQ $CE81  
0x03CE77|$0F:$CE67:C9 0D   	CMP #$0D   
0x03CE79|$0F:$CE69:D0 11   	BNE $CE7C  
0x03CE7B|$0F:$CE6B:A9 00   	LDA #$00   
0x03CE7D|$0F:$CE6D:8D 54 05	STA $0554  	; NPC #$03 X-pos
0x03CE80|$0F:$CE70:A9 13   	LDA #$13   
0x03CE82|$0F:$CE72:8D 55 05	STA $0555  	; NPC #$03 Y-pos
0x03CE85|$0F:$CE75:A9 01   	LDA #$01   
0x03CE87|$0F:$CE77:8D 58 05	STA $0558  	; NPC #$03 motion nybble + direction nybble
0x03CE8A|$0F:$CE7A:D0 05   	BNE $CE81  
; control flow target (from $CE4E, $CE69)
0x03CE8C|$0F:$CE7C:A9 FF   	LDA #$FF   
0x03CE8E|$0F:$CE7E:8D 59 05	STA $0559  	; NPC #$03 sprite ID
; control flow target (from $CE61, $CE65, $CE7A)
0x03CE91|$0F:$CE81:A9 FF   	LDA #$FF   
0x03CE93|$0F:$CE83:8D 61 05	STA $0561  	; NPC #$04 sprite ID
0x03CE96|$0F:$CE86:60      	RTS        

; control flow target (from $CE47)
0x03CE97|$0F:$CE87:A0 00   	LDY #$00   
; control flow target (from $CEE2)
0x03CE99|$0F:$CE89:D9 2C CF	CMP $CF2C,Y
0x03CE9C|$0F:$CE8C:D0 51   	BNE $CEDF  
0x03CE9E|$0F:$CE8E:A5 44   	LDA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CEA0|$0F:$CE90:D9 31 CF	CMP $CF31,Y
0x03CEA3|$0F:$CE93:D0 13   	BNE $CEA8  
0x03CEA5|$0F:$CE95:B9 36 CF	LDA $CF36,Y
0x03CEA8|$0F:$CE98:8D 54 05	STA $0554  	; NPC #$03 X-pos
0x03CEAB|$0F:$CE9B:B9 3B CF	LDA $CF3B,Y
0x03CEAE|$0F:$CE9E:8D 55 05	STA $0555  	; NPC #$03 Y-pos
0x03CEB1|$0F:$CEA1:B9 40 CF	LDA $CF40,Y
0x03CEB4|$0F:$CEA4:8D 58 05	STA $0558  	; NPC #$03 motion nybble + direction nybble
0x03CEB7|$0F:$CEA7:60      	RTS        

; control flow target (from $CE93)
0x03CEB8|$0F:$CEA8:D9 45 CF	CMP $CF45,Y
0x03CEBB|$0F:$CEAB:D0 2C   	BNE $CED9  
0x03CEBD|$0F:$CEAD:A5 16   	LDA $16    	; current map X-pos (1)
0x03CEBF|$0F:$CEAF:D9 4A CF	CMP $CF4A,Y
0x03CEC2|$0F:$CEB2:D0 25   	BNE $CED9  
0x03CEC4|$0F:$CEB4:A5 17   	LDA $17    	; current map Y-pos (1)
0x03CEC6|$0F:$CEB6:D9 4F CF	CMP $CF4F,Y
0x03CEC9|$0F:$CEB9:D0 1E   	BNE $CED9  
0x03CECB|$0F:$CEBB:B9 31 CF	LDA $CF31,Y
0x03CECE|$0F:$CEBE:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CED0|$0F:$CEC0:98      	TYA        
0x03CED1|$0F:$CEC1:48      	PHA        
0x03CED2|$0F:$CEC2:20 F1 CC	JSR $CCF1  	; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script)

; code -> data
; indirect data load target
0x03CED5|$0F:$CEC5:80
; indirect data load target
0x03CED6|$0F:$CEC6:22
; indirect data load target
0x03CED7|$0F:$CEC7:72 80	; $07:$8072; motion script for Lighthouse Wizard part 3

; data -> code
0x03CED9|$0F:$CEC9:68      	PLA        
0x03CEDA|$0F:$CECA:0A      	ASL        
0x03CEDB|$0F:$CECB:A8      	TAY        
0x03CEDC|$0F:$CECC:B9 54 CF	LDA $CF54,Y	; motion script pointers for Lighthouse Wizard
0x03CEDF|$0F:$CECF:8D 52 05	STA $0552  	; NPC #$02 scripted motion low byte
0x03CEE2|$0F:$CED2:B9 55 CF	LDA $CF55,Y
0x03CEE5|$0F:$CED5:8D 53 05	STA $0553  	; NPC #$02 scripted motion high byte
0x03CEE8|$0F:$CED8:60      	RTS        

; control flow target (from $CEAB, $CEB2, $CEB9)
0x03CEE9|$0F:$CED9:A9 FF   	LDA #$FF   
0x03CEEB|$0F:$CEDB:8D 59 05	STA $0559  	; NPC #$03 sprite ID
; control flow target (from $CEE6)
0x03CEEE|$0F:$CEDE:60      	RTS        

; control flow target (from $CE8C)
0x03CEEF|$0F:$CEDF:C8      	INY        
0x03CEF0|$0F:$CEE0:C0 05   	CPY #$05   
0x03CEF2|$0F:$CEE2:D0 A5   	BNE $CE89  
0x03CEF4|$0F:$CEE4:C9 50   	CMP #$50   	; Map ID #$50: Lighthouse 1F
0x03CEF6|$0F:$CEE6:F0 F6   	BEQ $CEDE  
0x03CEF8|$0F:$CEE8:C9 33   	CMP #$33   	; Map ID #$33: Sea Cave B5
0x03CEFA|$0F:$CEEA:D0 05   	BNE $CEF1  
0x03CEFC|$0F:$CEEC:A9 18   	LDA #$18   
0x03CEFE|$0F:$CEEE:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CF00|$0F:$CEF0:60      	RTS        

; control flow target (from $CEEA)
0x03CF01|$0F:$CEF1:C9 04   	CMP #$04   	; Map ID #$04: Midenhall B1
0x03CF03|$0F:$CEF3:D0 0C   	BNE $CF01  
0x03CF05|$0F:$CEF5:A5 D1   	LDA $D1    	; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown)
0x03CF07|$0F:$CEF7:4A      	LSR        
0x03CF08|$0F:$CEF8:90 2D   	BCC $CF27  
0x03CF0A|$0F:$CEFA:A9 FF   	LDA #$FF   
0x03CF0C|$0F:$CEFC:8D 69 05	STA $0569  	; NPC #$05 sprite ID
0x03CF0F|$0F:$CEFF:D0 26   	BNE $CF27  
; control flow target (from $CEF3)
0x03CF11|$0F:$CF01:C9 07   	CMP #$07   	; Map ID #$07: Hamlin
0x03CF13|$0F:$CF03:D0 0E   	BNE $CF13  
0x03CF15|$0F:$CF05:AD 51 06	LDA $0651  	; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03CF18|$0F:$CF08:29 04   	AND #$04   	; In Party
0x03CF1A|$0F:$CF0A:F0 07   	BEQ $CF13  
0x03CF1C|$0F:$CF0C:A9 FF   	LDA #$FF   
0x03CF1E|$0F:$CF0E:8D 59 05	STA $0559  	; NPC #$03 sprite ID
0x03CF21|$0F:$CF11:D0 14   	BNE $CF27  
; control flow target (from $CF03, $CF0A)
0x03CF23|$0F:$CF13:C9 08   	CMP #$08   	; Map ID #$08: Hamlin Waterway
0x03CF25|$0F:$CF15:D0 10   	BNE $CF27  
0x03CF27|$0F:$CF17:A5 D1   	LDA $D1    	; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown)
0x03CF29|$0F:$CF19:29 02   	AND #$02   
0x03CF2B|$0F:$CF1B:F0 0A   	BEQ $CF27  
0x03CF2D|$0F:$CF1D:A9 FF   	LDA #$FF   
0x03CF2F|$0F:$CF1F:8D 59 05	STA $0559  	; NPC #$03 sprite ID
0x03CF32|$0F:$CF22:8D 61 05	STA $0561  	; NPC #$04 sprite ID
0x03CF35|$0F:$CF25:D0 00   	BNE $CF27  
; control flow target (from $CEF8, $CEFF, $CF11, $CF15, $CF1B, $CF25)
0x03CF37|$0F:$CF27:A9 FF   	LDA #$FF   
0x03CF39|$0F:$CF29:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03CF3B|$0F:$CF2B:60      	RTS        


; code -> data
; indexed data load target (from $CE89)
0x03CF3C|$0F:$CF2C:55	; Map ID #$55: Lighthouse 6F
0x03CF3D|$0F:$CF2D:54	; Map ID #$54: Lighthouse 5F
0x03CF3E|$0F:$CF2E:53	; Map ID #$53: Lighthouse 4F
0x03CF3F|$0F:$CF2F:52	; Map ID #$52: Lighthouse 3F
0x03CF40|$0F:$CF30:51	; Map ID #$51: Lighthouse 2F
; indexed data load target (from $CE90, $CEBB)
; indirect data load target
0x03CF41|$0F:$CF31:0F
; indirect data load target
0x03CF42|$0F:$CF32:11
; indirect data load target
0x03CF43|$0F:$CF33:13
; indirect data load target
0x03CF44|$0F:$CF34:15
; indirect data load target
0x03CF45|$0F:$CF35:17
; indexed data load target (from $CE95)
; indirect data load target
0x03CF46|$0F:$CF36:12
; indirect data load target
0x03CF47|$0F:$CF37:1A
; indirect data load target
0x03CF48|$0F:$CF38:16
; indirect data load target
0x03CF49|$0F:$CF39:1E
; indirect data load target
0x03CF4A|$0F:$CF3A:1D
; indexed data load target (from $CE9B)
; indirect data load target
0x03CF4B|$0F:$CF3B:1B
; indirect data load target
0x03CF4C|$0F:$CF3C:0F
; indirect data load target
0x03CF4D|$0F:$CF3D:1B
; indirect data load target
0x03CF4E|$0F:$CF3E:17
; indirect data load target
0x03CF4F|$0F:$CF3F:1E
; indexed data load target (from $CEA1)
; indirect data load target
0x03CF50|$0F:$CF40:03
; indirect data load target
0x03CF51|$0F:$CF41:02
; indirect data load target
0x03CF52|$0F:$CF42:01
; indirect data load target
0x03CF53|$0F:$CF43:02
; indirect data load target
0x03CF54|$0F:$CF44:02
; indexed data load target (from $CEA8)
; indirect data load target
0x03CF55|$0F:$CF45:0E
; indirect data load target
0x03CF56|$0F:$CF46:10
; indirect data load target
0x03CF57|$0F:$CF47:12
; indirect data load target
0x03CF58|$0F:$CF48:14
; indirect data load target
0x03CF59|$0F:$CF49:16
; indexed data load target (from $CEAF)
; indirect data load target
0x03CF5A|$0F:$CF4A:01
; indirect data load target
0x03CF5B|$0F:$CF4B:19
; indirect data load target
0x03CF5C|$0F:$CF4C:1B
; indirect data load target
0x03CF5D|$0F:$CF4D:13
; indirect data load target
0x03CF5E|$0F:$CF4E:23
; indexed data load target (from $CEB6)
; indirect data load target
0x03CF5F|$0F:$CF4F:18
; indirect data load target
0x03CF60|$0F:$CF50:18
; indirect data load target
0x03CF61|$0F:$CF51:12
; indirect data load target
0x03CF62|$0F:$CF52:1E
; indirect data load target
0x03CF63|$0F:$CF53:1E
; motion script pointers for Lighthouse Wizard
; indexed data load target (from $CECC)
; indirect data load target
0x03CF64|$0F:$CF54:72
; indexed data load target (from $CED2)
0x03CF65|$0F:$CF55:   80	; $07:$8072; motion script for Lighthouse Wizard part 3
0x03CF66|$0F:$CF56:87 80	; $07:$8087; motion script for Lighthouse Wizard part 4
0x03CF68|$0F:$CF58:92 80	; $07:$8092; motion script for Lighthouse Wizard part 5
0x03CF6A|$0F:$CF5A:A0 80	; $07:$80A0; motion script for Lighthouse Wizard part 6
0x03CF6C|$0F:$CF5C:B3 80	; $07:$80B3; motion script for Lighthouse Wizard part 7

; data -> code
; external control flow target (from $02:$B1FD)
0x03CF6E|$0F:$CF5E:20 CB D8	JSR $D8CB  
0x03CF71|$0F:$CF61:4C 70 F7	JMP $F770  	; load ROM bank #$02

; external control flow target (from $06:$8053, $06:$827A, $06:$9371, $06:$A311, $06:$BBC4, $06:$BC2D)
0x03CF74|$0F:$CF64:20 CB D8	JSR $D8CB  
; load ROM bank #$06
; control flow target (from $CF6D, $CF73, $CF79)
0x03CF77|$0F:$CF67:4C 61 F7	JMP $F761  	; load ROM bank #$06

; wipe selected menu region
; external control flow target (from $06:$806F, $06:$8097, $06:$84C9, $06:$8A16, $06:$8A5C, $06:$8B09, $06:$9555, $06:$9CE0)
0x03CF7A|$0F:$CF6A:20 8C F7	JSR $F78C  	; wipe selected menu region
0x03CF7D|$0F:$CF6D:4C 67 CF	JMP $CF67  	; load ROM bank #$06

; external control flow target (from $06:$80AD, $06:$96E1)
0x03CF80|$0F:$CF70:20 87 F7	JSR $F787  
0x03CF83|$0F:$CF73:4C 67 CF	JMP $CF67  	; load ROM bank #$06

; external control flow target (from $06:$826D)
0x03CF86|$0F:$CF76:20 F7 D2	JSR $D2F7  
0x03CF89|$0F:$CF79:4C 67 CF	JMP $CF67  	; load ROM bank #$06

; external control flow target (from $06:$8C6A, $06:$8C77, $06:$8C84, $06:$9775)
0x03CF8C|$0F:$CF7C:A9 00   	LDA #$00   
0x03CF8E|$0F:$CF7E:85 49   	STA $49    	; object hero/target/item/string ID $49
0x03CF90|$0F:$CF80:20 6B D0	JSR $D06B  	; copy $16 to $0C, $17 to $0E
0x03CF93|$0F:$CF83:C6 0E   	DEC $0E    	; check up
0x03CF95|$0F:$CF85:20 A5 CF	JSR $CFA5  
0x03CF98|$0F:$CF88:20 6B D0	JSR $D06B  	; copy $16 to $0C, $17 to $0E
0x03CF9B|$0F:$CF8B:E6 0C   	INC $0C    	; check right
0x03CF9D|$0F:$CF8D:20 A5 CF	JSR $CFA5  
0x03CFA0|$0F:$CF90:20 6B D0	JSR $D06B  	; copy $16 to $0C, $17 to $0E
0x03CFA3|$0F:$CF93:E6 0E   	INC $0E    	; check down
0x03CFA5|$0F:$CF95:20 A5 CF	JSR $CFA5  
0x03CFA8|$0F:$CF98:20 6B D0	JSR $D06B  	; copy $16 to $0C, $17 to $0E
0x03CFAB|$0F:$CF9B:C6 0C   	DEC $0C    	; check left
0x03CFAD|$0F:$CF9D:20 A5 CF	JSR $CFA5  
0x03CFB0|$0F:$CFA0:A5 94   	LDA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03CFB2|$0F:$CFA2:4C D5 C3	JMP $C3D5  	; save A to $05F6, X to $43, and load bank specified by A

; control flow target (from $CF85, $CF8D, $CF95, $CF9D)
0x03CFB5|$0F:$CFA5:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03CFB8|$0F:$CFA8:20 89 DF	JSR $DF89  
0x03CFBB|$0F:$CFAB:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03CFBD|$0F:$CFAD:D0 01   	BNE $CFB0  
; control flow target (from $CFB8, $CFBC, $CFCB, $D000, $D006, $D00A)
0x03CFBF|$0F:$CFAF:60      	RTS        

; control flow target (from $CFAD)
0x03CFC0|$0F:$CFB0:C9 01   	CMP #$01   
0x03CFC2|$0F:$CFB2:D0 48   	BNE $CFFC  
0x03CFC4|$0F:$CFB4:A5 0C   	LDA $0C    
0x03CFC6|$0F:$CFB6:C9 18   	CMP #$18   
0x03CFC8|$0F:$CFB8:90 F5   	BCC $CFAF  
0x03CFCA|$0F:$CFBA:C9 1B   	CMP #$1B   
0x03CFCC|$0F:$CFBC:B0 F1   	BCS $CFAF  
0x03CFCE|$0F:$CFBE:A9 01   	LDA #$01   
0x03CFD0|$0F:$CFC0:05 49   	ORA $49    	; object hero/target/item/string ID $49
0x03CFD2|$0F:$CFC2:85 49   	STA $49    	; object hero/target/item/string ID $49
0x03CFD4|$0F:$CFC4:A5 C9   	LDA $C9    
0x03CFD6|$0F:$CFC6:18      	CLC        
0x03CFD7|$0F:$CFC7:69 18   	ADC #$18   
0x03CFD9|$0F:$CFC9:C5 0C   	CMP $0C    
0x03CFDB|$0F:$CFCB:D0 E2   	BNE $CFAF  
0x03CFDD|$0F:$CFCD:20 58 D0	JSR $D058  
0x03CFE0|$0F:$CFD0:A9 FF   	LDA #$FF   
0x03CFE2|$0F:$CFD2:85 49   	STA $49    	; object hero/target/item/string ID $49
0x03CFE4|$0F:$CFD4:A5 12   	LDA $12    
0x03CFE6|$0F:$CFD6:99 2A 05	STA $052A,Y
0x03CFE9|$0F:$CFD9:A5 13   	LDA $13    
0x03CFEB|$0F:$CFDB:99 2B 05	STA $052B,Y
0x03CFEE|$0F:$CFDE:A5 12   	LDA $12    
0x03CFF0|$0F:$CFE0:38      	SEC        
0x03CFF1|$0F:$CFE1:E5 16   	SBC $16    	; current map X-pos (1)
0x03CFF3|$0F:$CFE3:0A      	ASL        
0x03CFF4|$0F:$CFE4:85 18   	STA $18    
0x03CFF6|$0F:$CFE6:A5 13   	LDA $13    
0x03CFF8|$0F:$CFE8:38      	SEC        
0x03CFF9|$0F:$CFE9:E5 17   	SBC $17    	; current map Y-pos (1)
0x03CFFB|$0F:$CFEB:0A      	ASL        
0x03CFFC|$0F:$CFEC:85 19   	STA $19    
0x03CFFE|$0F:$CFEE:A9 00   	LDA #$00   
0x03D000|$0F:$CFF0:85 1C   	STA $1C    
0x03D002|$0F:$CFF2:85 1E   	STA $1E    
0x03D004|$0F:$CFF4:A9 93   	LDA #$93   	; Music ID #$93: door open SFX
0x03D006|$0F:$CFF6:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03D009|$0F:$CFF9:4C 74 D0	JMP $D074  

; control flow target (from $CFB2)
0x03D00C|$0F:$CFFC:A5 C9   	LDA $C9    
0x03D00E|$0F:$CFFE:C9 02   	CMP #$02   
0x03D010|$0F:$D000:B0 AD   	BCS $CFAF  
0x03D012|$0F:$D002:A5 0C   	LDA $0C    
0x03D014|$0F:$D004:C9 18   	CMP #$18   
0x03D016|$0F:$D006:90 A7   	BCC $CFAF  
0x03D018|$0F:$D008:C9 1C   	CMP #$1C   
0x03D01A|$0F:$D00A:B0 A3   	BCS $CFAF  
0x03D01C|$0F:$D00C:A9 01   	LDA #$01   
0x03D01E|$0F:$D00E:05 49   	ORA $49    	; object hero/target/item/string ID $49
0x03D020|$0F:$D010:85 49   	STA $49    	; object hero/target/item/string ID $49
0x03D022|$0F:$D012:20 58 D0	JSR $D058  
0x03D025|$0F:$D015:A9 FF   	LDA #$FF   
0x03D027|$0F:$D017:85 49   	STA $49    	; object hero/target/item/string ID $49
0x03D029|$0F:$D019:A5 12   	LDA $12    
0x03D02B|$0F:$D01B:99 2A 05	STA $052A,Y
0x03D02E|$0F:$D01E:A5 13   	LDA $13    
0x03D030|$0F:$D020:99 2B 05	STA $052B,Y
0x03D033|$0F:$D023:A5 12   	LDA $12    
0x03D035|$0F:$D025:0A      	ASL        
0x03D036|$0F:$D026:38      	SEC        
0x03D037|$0F:$D027:E5 16   	SBC $16    	; current map X-pos (1)
0x03D039|$0F:$D029:0A      	ASL        
0x03D03A|$0F:$D02A:85 18   	STA $18    
0x03D03C|$0F:$D02C:A5 13   	LDA $13    
0x03D03E|$0F:$D02E:0A      	ASL        
0x03D03F|$0F:$D02F:38      	SEC        
0x03D040|$0F:$D030:E5 17   	SBC $17    	; current map Y-pos (1)
0x03D042|$0F:$D032:0A      	ASL        
0x03D043|$0F:$D033:85 19   	STA $19    
0x03D045|$0F:$D035:A9 00   	LDA #$00   
0x03D047|$0F:$D037:85 1C   	STA $1C    
0x03D049|$0F:$D039:85 1E   	STA $1E    
0x03D04B|$0F:$D03B:A9 93   	LDA #$93   	; Music ID #$93: door open SFX
0x03D04D|$0F:$D03D:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03D050|$0F:$D040:20 74 D0	JSR $D074  
0x03D053|$0F:$D043:E6 18   	INC $18    
0x03D055|$0F:$D045:E6 18   	INC $18    
0x03D057|$0F:$D047:20 74 D0	JSR $D074  
0x03D05A|$0F:$D04A:E6 19   	INC $19    
0x03D05C|$0F:$D04C:E6 19   	INC $19    
0x03D05E|$0F:$D04E:20 74 D0	JSR $D074  
0x03D061|$0F:$D051:C6 18   	DEC $18    
0x03D063|$0F:$D053:C6 18   	DEC $18    
0x03D065|$0F:$D055:4C 74 D0	JMP $D074  

; control flow target (from $CAC3, $CFCD, $D012)
0x03D068|$0F:$D058:A0 00   	LDY #$00   
; control flow target (from $D066)
0x03D06A|$0F:$D05A:B9 2A 05	LDA $052A,Y
0x03D06D|$0F:$D05D:19 2B 05	ORA $052B,Y
0x03D070|$0F:$D060:F0 08   	BEQ $D06A  
0x03D072|$0F:$D062:C8      	INY        
0x03D073|$0F:$D063:C8      	INY        
0x03D074|$0F:$D064:C0 10   	CPY #$10   
0x03D076|$0F:$D066:D0 F2   	BNE $D05A  
0x03D078|$0F:$D068:68      	PLA        
0x03D079|$0F:$D069:68      	PLA        
; control flow target (from $D060)
0x03D07A|$0F:$D06A:60      	RTS        

; copy $16 to $0C, $17 to $0E
; control flow target (from $CF80, $CF88, $CF90, $CF98, $D0A0)
0x03D07B|$0F:$D06B:A5 16   	LDA $16    	; current map X-pos (1)
0x03D07D|$0F:$D06D:85 0C   	STA $0C    
0x03D07F|$0F:$D06F:A5 17   	LDA $17    	; current map Y-pos (1)
0x03D081|$0F:$D071:85 0E   	STA $0E    
0x03D083|$0F:$D073:60      	RTS        

; control flow target (from $CFF9, $D040, $D047, $D04E, $D055)
0x03D084|$0F:$D074:A5 18   	LDA $18    
0x03D086|$0F:$D076:18      	CLC        
0x03D087|$0F:$D077:69 10   	ADC #$10   
0x03D089|$0F:$D079:85 0C   	STA $0C    
0x03D08B|$0F:$D07B:A5 19   	LDA $19    
0x03D08D|$0F:$D07D:18      	CLC        
0x03D08E|$0F:$D07E:69 0E   	ADC #$0E   
0x03D090|$0F:$D080:85 0E   	STA $0E    
0x03D092|$0F:$D082:20 2D DE	JSR $DE2D  
0x03D095|$0F:$D085:A0 00   	LDY #$00   
0x03D097|$0F:$D087:B1 07   	LDA ($07),Y
0x03D099|$0F:$D089:F0 01   	BEQ $D08C  
0x03D09B|$0F:$D08B:60      	RTS        

; control flow target (from $D089)
0x03D09C|$0F:$D08C:A9 00   	LDA #$00   
0x03D09E|$0F:$D08E:85 1C   	STA $1C    
0x03D0A0|$0F:$D090:85 1E   	STA $1E    
0x03D0A2|$0F:$D092:4C C5 DE	JMP $DEC5  

; external control flow target (from $06:$9B30)
0x03D0A5|$0F:$D095:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03D0A7|$0F:$D097:D0 07   	BNE $D0A0  
; control flow target (from $D0AA, $D0BC)
0x03D0A9|$0F:$D099:A5 94   	LDA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03D0AB|$0F:$D09B:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03D0AE|$0F:$D09E:18      	CLC        
0x03D0AF|$0F:$D09F:60      	RTS        

; control flow target (from $D097)
0x03D0B0|$0F:$D0A0:20 6B D0	JSR $D06B  	; copy $16 to $0C, $17 to $0E
0x03D0B3|$0F:$D0A3:20 89 DF	JSR $DF89  
0x03D0B6|$0F:$D0A6:A5 0C   	LDA $0C    
0x03D0B8|$0F:$D0A8:C9 14   	CMP #$14   
0x03D0BA|$0F:$D0AA:D0 ED   	BNE $D099  
0x03D0BC|$0F:$D0AC:A0 00   	LDY #$00   
; control flow target (from $D0BA)
0x03D0BE|$0F:$D0AE:B9 1A 05	LDA $051A,Y	; something to do with whether you've opened the chest containing the Shield of Erdrick
0x03D0C1|$0F:$D0B1:19 1B 05	ORA $051B,Y
0x03D0C4|$0F:$D0B4:F0 08   	BEQ $D0BE  
0x03D0C6|$0F:$D0B6:C8      	INY        
0x03D0C7|$0F:$D0B7:C8      	INY        
0x03D0C8|$0F:$D0B8:C0 10   	CPY #$10   
0x03D0CA|$0F:$D0BA:D0 F2   	BNE $D0AE  
0x03D0CC|$0F:$D0BC:F0 DB   	BEQ $D099  
; control flow target (from $D0B4)
0x03D0CE|$0F:$D0BE:A5 12   	LDA $12    
0x03D0D0|$0F:$D0C0:99 1A 05	STA $051A,Y	; something to do with whether you've opened the chest containing the Shield of Erdrick
0x03D0D3|$0F:$D0C3:A5 13   	LDA $13    
0x03D0D5|$0F:$D0C5:99 1B 05	STA $051B,Y
0x03D0D8|$0F:$D0C8:A0 00   	LDY #$00   
0x03D0DA|$0F:$D0CA:B1 10   	LDA ($10),Y
0x03D0DC|$0F:$D0CC:29 E0   	AND #$E0   
0x03D0DE|$0F:$D0CE:91 10   	STA ($10),Y
0x03D0E0|$0F:$D0D0:A9 92   	LDA #$92   	; Music ID #$92: open chest SFX
0x03D0E2|$0F:$D0D2:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03D0E5|$0F:$D0D5:A9 00   	LDA #$00   
0x03D0E7|$0F:$D0D7:85 18   	STA $18    
0x03D0E9|$0F:$D0D9:85 19   	STA $19    
0x03D0EB|$0F:$D0DB:85 1C   	STA $1C    
0x03D0ED|$0F:$D0DD:85 1E   	STA $1E    
0x03D0EF|$0F:$D0DF:20 C5 DE	JSR $DEC5  
0x03D0F2|$0F:$D0E2:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03D0F5|$0F:$D0E5:A5 94   	LDA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03D0F7|$0F:$D0E7:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03D0FA|$0F:$D0EA:38      	SEC        
0x03D0FB|$0F:$D0EB:60      	RTS        

; update each hero's stats based on their current EXP
; control flow target (from $F5AE)
; external control flow target (from $06:$8B04)
0x03D0FC|$0F:$D0EC:20 66 F7	JSR $F766  	; load ROM bank #$04
; call to code in a different bank ($04:$8009)
0x03D0FF|$0F:$D0EF:20 09 80	JSR $8009  	; update each hero's stats based on their current EXP
0x03D102|$0F:$D0F2:4C 61 F7	JMP $F761  	; load ROM bank #$06

; wait for a while and then wipe menu regions #$03, #$00, and #$01
; control flow target (from $C84A, $C85A, $C944, $C9AF, $CA39, $CAA9, $CB36, $CB94, $CC00, $CC0E, $CC59, $CC76, $D1A1, $D1C6)
; external control flow target (from $06:$90C3, $06:$91B7, $06:$935C, $06:$9374, $06:$96A8, $06:$9709, $06:$979E, $06:$98F0, $06:$A1B1, $06:$A2F8, $06:$BB80, $06:$BBB3, $06:$BBD7, $07:$81FC, $07:$8227, $07:$8238, $07:$827F, $07:$82EB, $07:$8355, $07:$8366, $07:$837B, $07:$8402, $07:$84CB, $07:$8595)
0x03D105|$0F:$D0F5:8A      	TXA        	; save X on the stack; pointless since X gets overwritten before next use
0x03D106|$0F:$D0F6:48      	PHA        
0x03D107|$0F:$D0F7:A2 1E   	LDX #$1E   
0x03D109|$0F:$D0F9:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03D10C|$0F:$D0FC:68      	PLA        	; restore X from the stack
0x03D10D|$0F:$D0FD:AA      	TAX        
0x03D10E|$0F:$D0FE:AD 2C 06	LDA $062C  	; current battle message delay
0x03D111|$0F:$D101:C9 28   	CMP #$28   	; FAST uses #$82
0x03D113|$0F:$D103:F0 0C   	BEQ $D111  
0x03D115|$0F:$D105:C9 46   	CMP #$46   	; NORMAL uses #$AA
0x03D117|$0F:$D107:F0 04   	BEQ $D10D  
0x03D119|$0F:$D109:A9 E6   	LDA #$E6   	; ergo SLOW uses #$E6
0x03D11B|$0F:$D10B:D0 06   	BNE $D113  
; control flow target (from $D107)
0x03D11D|$0F:$D10D:A9 AA   	LDA #$AA   	; from NORMAL
0x03D11F|$0F:$D10F:D0 02   	BNE $D113  
; control flow target (from $D103)
0x03D121|$0F:$D111:A9 82   	LDA #$82   	; from FAST
; control flow target (from $D10B, $D10F)
0x03D123|$0F:$D113:85 93   	STA $93    	; NMI counter, decremented once per NMI until it reaches 0
; wait until battle message delay reaches zero or no buttons pressed
; control flow target (from $D11E)
0x03D125|$0F:$D115:20 3D D1	JSR $D13D  	; wait for interrupt, read joypad data into $2F and A
0x03D128|$0F:$D118:A6 93   	LDX $93    	; NMI counter, decremented once per NMI until it reaches 0
0x03D12A|$0F:$D11A:F0 0F   	BEQ $D12B  
0x03D12C|$0F:$D11C:C9 00   	CMP #$00   
0x03D12E|$0F:$D11E:D0 F5   	BNE $D115  
; wait until battle message delay reaches is zero or some button pressed
; control flow target (from $D129)
0x03D130|$0F:$D120:20 3D D1	JSR $D13D  	; wait for interrupt, read joypad data into $2F and A
0x03D133|$0F:$D123:A6 93   	LDX $93    	; NMI counter, decremented once per NMI until it reaches 0
0x03D135|$0F:$D125:F0 04   	BEQ $D12B  
0x03D137|$0F:$D127:C9 00   	CMP #$00   
0x03D139|$0F:$D129:F0 F5   	BEQ $D120  
; control flow target (from $D11A, $D125)
0x03D13B|$0F:$D12B:20 89 FA	JSR $FA89  	; useless JSR to RTS?!
0x03D13E|$0F:$D12E:A9 03   	LDA #$03   
0x03D140|$0F:$D130:20 8C F7	JSR $F78C  	; wipe selected menu region
0x03D143|$0F:$D133:A9 00   	LDA #$00   
0x03D145|$0F:$D135:20 8C F7	JSR $F78C  	; wipe selected menu region
0x03D148|$0F:$D138:A9 01   	LDA #$01   
0x03D14A|$0F:$D13A:4C 8C F7	JMP $F78C  	; wipe selected menu region

; wait for interrupt, read joypad data into $2F and A
; control flow target (from $D115, $D120)
; external control flow target (from $06:$809D, $06:$80A2)
0x03D14D|$0F:$D13D:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03D150|$0F:$D140:20 76 C4	JSR $C476  	; read joypad 1 data into $2F
0x03D153|$0F:$D143:A5 2F   	LDA $2F    	; joypad 1 data
0x03D155|$0F:$D145:60      	RTS        

; heal hero ID in A by random amount based on healing power in X
; external control flow target (from $06:$8BED)
0x03D156|$0F:$D146:20 66 F7	JSR $F766  	; load ROM bank #$04
; call to code in a different bank ($04:$8006)
0x03D159|$0F:$D149:20 06 80	JSR $8006  
0x03D15C|$0F:$D14C:4C 61 F7	JMP $F761  	; load ROM bank #$06

; control flow target (from $FF60)
; external control flow target (from $06:$A848, $06:$A98F)
0x03D15F|$0F:$D14F:A9 00   	LDA #$00   
0x03D161|$0F:$D151:85 27   	STA $27    	; map palette; offset from ($E27C)
0x03D163|$0F:$D153:20 F9 E2	JSR $E2F9  
0x03D166|$0F:$D156:4C 61 F7	JMP $F761  	; load ROM bank #$06

; external control flow target (from $06:$A35D)
0x03D169|$0F:$D159:A5 94   	LDA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03D16B|$0F:$D15B:48      	PHA        
0x03D16C|$0F:$D15C:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03D16F|$0F:$D15F:C4	; $06:$8008

; data -> code
0x03D170|$0F:$D160:20 2A FA	JSR $FA2A  	; display string ID specified by next byte

; code -> data
; indirect data load target
0x03D173|$0F:$D163:7A	; String ID #$007A: ‘Then farewell and good luck!’[end-FC]

; data -> code
; control flow target (from $D172)
0x03D174|$0F:$D164:20 61 F7	JSR $F761  	; load ROM bank #$06
0x03D177|$0F:$D167:68      	PLA        
0x03D178|$0F:$D168:85 94   	STA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03D17A|$0F:$D16A:60      	RTS        

; external control flow target (from $06:$8F20)
0x03D17B|$0F:$D16B:A5 94   	LDA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03D17D|$0F:$D16D:48      	PHA        
0x03D17E|$0F:$D16E:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03D181|$0F:$D171:C4	; $06:$8008

; data -> code
0x03D182|$0F:$D172:4C 64 D1	JMP $D164  

; external control flow target (from $06:$A882)
0x03D185|$0F:$D175:A9 8F   	LDA #$8F   
0x03D187|$0F:$D177:85 30   	STA $30    
0x03D189|$0F:$D179:20 DE D2	JSR $D2DE  
0x03D18C|$0F:$D17C:20 75 F7	JSR $F775  	; load ROM bank #$03
; call to code in a different bank ($03:$8006)
0x03D18F|$0F:$D17F:20 06 80	JSR $8006  
0x03D192|$0F:$D182:A9 FF   	LDA #$FF   
0x03D194|$0F:$D184:85 8E   	STA $8E    	; flag for in battle or not (#$FF)?
0x03D196|$0F:$D186:A9 04   	LDA #$04   	; Menu ID #$04: Dialogue window
0x03D198|$0F:$D188:20 89 EB	JSR $EB89  	; open menu specified by A
0x03D19B|$0F:$D18B:A9 00   	LDA #$00   
0x03D19D|$0F:$D18D:85 27   	STA $27    	; map palette; offset from ($E27C)
0x03D19F|$0F:$D18F:20 F9 E2	JSR $E2F9  
0x03D1A2|$0F:$D192:E6 8E   	INC $8E    	; flag for in battle or not (#$FF)?
0x03D1A4|$0F:$D194:A9 7B   	LDA #$7B   	; String ID #$007B: In that case, return when thou can, for Hargon does not sleep.[wait][line]In order to preserve the Imperial Scrolls of honor, please hold the REST button in while pushing the POWER button off.[wait][line]If you turn off the POWER first, you may lose the record of your great deeds, and that would be a shame.[line][FD][FD] [line][end-FC]
0x03D1A6|$0F:$D196:20 4A FA	JSR $FA4A  	; display string ID specified by A
0x03D1A9|$0F:$D199:A9 10   	LDA #$10   
0x03D1AB|$0F:$D19B:20 36 C6	JSR $C636  	; set CHR bank 0 based on A
; infinite loop
; control flow target (from $D19E)
0x03D1AE|$0F:$D19E:4C 9E D1	JMP $D19E  	; infinite loop

; handle Hamlin Waterway Gremlins fight
; external control flow target (from $06:$906E)
0x03D1B1|$0F:$D1A1:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03D1B4|$0F:$D1A4:20 66 F7	JSR $F766  	; load ROM bank #$04
0x03D1B7|$0F:$D1A7:A9 03   	LDA #$03   	; Fixed Battle #$03: 2 Ozwargs (Map ID #$08: Hamlin Waterway)
; call to code in a different bank ($04:$800F)
0x03D1B9|$0F:$D1A9:20 0F 80	JSR $800F  
0x03D1BC|$0F:$D1AC:A5 98   	LDA $98    	; outcome of last fight?
0x03D1BE|$0F:$D1AE:C9 FC   	CMP #$FC   
0x03D1C0|$0F:$D1B0:F0 0E   	BEQ $D1C0  
0x03D1C2|$0F:$D1B2:A9 02   	LDA #$02   
0x03D1C4|$0F:$D1B4:05 D1   	ORA $D1    	; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown)
0x03D1C6|$0F:$D1B6:85 D1   	STA $D1    	; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown)
0x03D1C8|$0F:$D1B8:A9 FF   	LDA #$FF   
0x03D1CA|$0F:$D1BA:8D 59 05	STA $0559  	; NPC #$03 sprite ID
0x03D1CD|$0F:$D1BD:8D 61 05	STA $0561  	; NPC #$04 sprite ID
; control flow target (from $D1B0)
0x03D1D0|$0F:$D1C0:20 62 D2	JSR $D262  
0x03D1D3|$0F:$D1C3:4C FB D2	JMP $D2FB  	; load ROM bank 6

; external control flow target (from $06:$9342)
0x03D1D6|$0F:$D1C6:20 F5 D0	JSR $D0F5  	; wait for a while and then wipe menu regions #$03, #$00, and #$01
0x03D1D9|$0F:$D1C9:20 66 F7	JSR $F766  	; load ROM bank #$04
0x03D1DC|$0F:$D1CC:A9 04   	LDA #$04   	; Fixed Battle #$04: 2 Gold Batboons (Map ID #$16: Hargon's Castle 1F)
; call to code in a different bank ($04:$800F)
0x03D1DE|$0F:$D1CE:20 0F 80	JSR $800F  
0x03D1E1|$0F:$D1D1:A5 98   	LDA $98    	; outcome of last fight?
0x03D1E3|$0F:$D1D3:C9 FC   	CMP #$FC   
0x03D1E5|$0F:$D1D5:F0 08   	BEQ $D1DF  
0x03D1E7|$0F:$D1D7:A9 FF   	LDA #$FF   
0x03D1E9|$0F:$D1D9:8D 81 05	STA $0581  	; NPC #$08 sprite ID
0x03D1EC|$0F:$D1DC:8D 89 05	STA $0589  	; NPC #$09 sprite ID
; control flow target (from $D1D5)
0x03D1EF|$0F:$D1DF:20 62 D2	JSR $D262  
0x03D1F2|$0F:$D1E2:4C FB D2	JMP $D2FB  	; load ROM bank 6

; trigger Fixed Battle #$01: 1 Evil Clown (Map ID #$04: Midenhall B1)
; external control flow target (from $06:$80E5)
0x03D1F5|$0F:$D1E5:A9 FF   	LDA #$FF   
0x03D1F7|$0F:$D1E7:8D 69 05	STA $0569  	; NPC #$05 sprite ID
0x03D1FA|$0F:$D1EA:A9 01   	LDA #$01   	; Fixed Battle #$01: 1 Evil Clown (Map ID #$04: Midenhall B1)
0x03D1FC|$0F:$D1EC:20 5C D2	JSR $D25C  	; trigger fixed battle A
0x03D1FF|$0F:$D1EF:A9 01   	LDA #$01   
0x03D201|$0F:$D1F1:05 D1   	ORA $D1    	; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown)
0x03D203|$0F:$D1F3:85 D1   	STA $D1    	; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown)
0x03D205|$0F:$D1F5:4C FB D2	JMP $D2FB  	; load ROM bank 6

; trigger Fixed Battle #$0B: 1 Hargon (Map ID #$17: Hargon's Castle 7F)
; external control flow target (from $06:$935F)
0x03D208|$0F:$D1F8:A9 0B   	LDA #$0B   	; Fixed Battle #$0B: 1 Hargon (Map ID #$17: Hargon's Castle 7F)
0x03D20A|$0F:$D1FA:20 5C D2	JSR $D25C  	; trigger fixed battle A
0x03D20D|$0F:$D1FD:4C FB D2	JMP $D2FB  	; load ROM bank 6

; external control flow target (from $06:$BD2A)
0x03D210|$0F:$D200:20 66 F7	JSR $F766  	; load ROM bank #$04
0x03D213|$0F:$D203:A9 0C   	LDA #$0C   	; Fixed Battle #$0C: 1 Malroth (Map ID #$17: Hargon's Castle 7F)
; call to code in a different bank ($04:$800F)
0x03D215|$0F:$D205:20 0F 80	JSR $800F  
0x03D218|$0F:$D208:A9 FF   	LDA #$FF   
0x03D21A|$0F:$D20A:85 44   	STA $44    	; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end)
0x03D21C|$0F:$D20C:A5 98   	LDA $98    	; outcome of last fight?
0x03D21E|$0F:$D20E:C9 FF   	CMP #$FF   
0x03D220|$0F:$D210:D0 03   	BNE $D215  
0x03D222|$0F:$D212:4C 67 D2	JMP $D267  

; control flow target (from $D210)
0x03D225|$0F:$D215:4C 61 F7	JMP $F761  	; load ROM bank #$06

; open path to Sea Cave
; external control flow target (from $06:$98FD)
0x03D228|$0F:$D218:A9 97   	LDA #$97   	; Music ID #$97: shoals submerging SFX
0x03D22A|$0F:$D21A:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03D22D|$0F:$D21D:20 5C F7	JSR $F75C  	; load ROM bank #$00
0x03D230|$0F:$D220:A9 00   	LDA #$00   
; call to code in a different bank ($00:$8006)
0x03D232|$0F:$D222:20 06 80	JSR $8006  
0x03D235|$0F:$D225:A9 32   	LDA #$32   
0x03D237|$0F:$D227:85 41   	STA $41    
0x03D239|$0F:$D229:20 38 E9	JSR $E938  
0x03D23C|$0F:$D22C:A9 97   	LDA #$97   	; Music ID #$97: shoals submerging SFX
0x03D23E|$0F:$D22E:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03D241|$0F:$D231:20 5C F7	JSR $F75C  	; load ROM bank #$00
0x03D244|$0F:$D234:A9 FF   	LDA #$FF   
; call to code in a different bank ($00:$8006)
0x03D246|$0F:$D236:20 06 80	JSR $8006  
0x03D249|$0F:$D239:68      	PLA        
0x03D24A|$0F:$D23A:68      	PLA        
0x03D24B|$0F:$D23B:4C 61 F7	JMP $F761  	; load ROM bank #$06

; external control flow target (from $06:$96B0)
0x03D24E|$0F:$D23E:20 5C F7	JSR $F75C  	; load ROM bank #$00
; call to code in a different bank ($00:$8009)
0x03D251|$0F:$D241:20 09 80	JSR $8009  
0x03D254|$0F:$D244:A9 01   	LDA #$01   
0x03D256|$0F:$D246:8D F9 05	STA $05F9  	; flag for Cave to Rhone open
0x03D259|$0F:$D249:A9 32   	LDA #$32   
0x03D25B|$0F:$D24B:85 41   	STA $41    
0x03D25D|$0F:$D24D:20 38 E9	JSR $E938  
0x03D260|$0F:$D250:20 5C F7	JSR $F75C  	; load ROM bank #$00
; call to code in a different bank ($00:$800C)
0x03D263|$0F:$D253:4C 0C 80	JMP $800C  

; external control flow target (from $06:$97BA, $06:$97C1)
0x03D266|$0F:$D256:20 C5 DE	JSR $DEC5  
0x03D269|$0F:$D259:4C 61 F7	JMP $F761  	; load ROM bank #$06

; trigger fixed battle A
; control flow target (from $C8D1, $CAFC, $CC38, $CC94, $D1EC, $D1FA)
0x03D26C|$0F:$D25C:20 66 F7	JSR $F766  	; load ROM bank #$04
; call to code in a different bank ($04:$800F)
0x03D26F|$0F:$D25F:20 0F 80	JSR $800F  
; control flow target (from $C908, $C972, $D1C0, $D1DF)
0x03D272|$0F:$D262:A5 98   	LDA $98    	; outcome of last fight?
0x03D274|$0F:$D264:D0 01   	BNE $D267  
0x03D276|$0F:$D266:60      	RTS        

; control flow target (from $D212, $D264)
0x03D277|$0F:$D267:A9 00   	LDA #$00   
0x03D279|$0F:$D269:85 8E   	STA $8E    	; flag for in battle or not (#$FF)?
0x03D27B|$0F:$D26B:A5 98   	LDA $98    	; outcome of last fight?
0x03D27D|$0F:$D26D:C9 FF   	CMP #$FF   
0x03D27F|$0F:$D26F:D0 24   	BNE $D295  
; external control flow target (from $06:$A25A)
0x03D281|$0F:$D271:A9 26   	LDA #$26   
0x03D283|$0F:$D273:8D 0E 05	STA $050E  
0x03D286|$0F:$D276:20 DE D2	JSR $D2DE  
0x03D289|$0F:$D279:A9 84   	LDA #$84   
0x03D28B|$0F:$D27B:8D 2D 06	STA $062D  	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03D28E|$0F:$D27E:A2 FF   	LDX #$FF   
0x03D290|$0F:$D280:9A      	TXS        
0x03D291|$0F:$D281:A9 01   	LDA #$01   
0x03D293|$0F:$D283:8D 3B 06	STA $063B  	; Midenhall Current HP, low byte
0x03D296|$0F:$D286:20 FB D2	JSR $D2FB  	; load ROM bank 6
; call to code in a different bank ($06:$8DCC)
0x03D299|$0F:$D289:20 CC 8D	JSR $8DCC  	; restore full HP to all living party members
0x03D29C|$0F:$D28C:20 B9 D2	JSR $D2B9  
; call to code in a different bank ($06:$8F39)
0x03D29F|$0F:$D28F:20 39 8F	JSR $8F39  
0x03D2A2|$0F:$D292:4C 00 C7	JMP $C700  

; control flow target (from $D26F)
0x03D2A5|$0F:$D295:20 DE D2	JSR $D2DE  
0x03D2A8|$0F:$D298:A9 FF   	LDA #$FF   
; control flow target (from $C9A5)
0x03D2AA|$0F:$D29A:85 45   	STA $45    
0x03D2AC|$0F:$D29C:20 5C F7	JSR $F75C  	; load ROM bank #$00
0x03D2AF|$0F:$D29F:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03D2B1|$0F:$D2A1:85 0C   	STA $0C    
; call to code in a different bank ($00:$8000)
0x03D2B3|$0F:$D2A3:20 00 80	JSR $8000  
0x03D2B6|$0F:$D2A6:20 F7 D2	JSR $D2F7  
0x03D2B9|$0F:$D2A9:20 5C F7	JSR $F75C  	; load ROM bank #$00
0x03D2BC|$0F:$D2AC:A9 04   	LDA #$04   
0x03D2BE|$0F:$D2AE:85 0C   	STA $0C    
; call to code in a different bank ($00:$8000)
0x03D2C0|$0F:$D2B0:20 00 80	JSR $8000  
0x03D2C3|$0F:$D2B3:4C 81 E2	JMP $E281  

0x03D2C6|$0F:$D2B6:20 2A C4	JSR $C42A  
; control flow target (from $C6FA, $D28C)
0x03D2C9|$0F:$D2B9:20 FB D2	JSR $D2FB  	; load ROM bank 6
0x03D2CC|$0F:$D2BC:20 A2 E5	JSR $E5A2  
0x03D2CF|$0F:$D2BF:A2 03   	LDX #$03   
0x03D2D1|$0F:$D2C1:20 E7 D2	JSR $D2E7  	; X = 1 => CLC and update $0C-$0D to warp point data to use if Outside allowed from current map, SEC otherwise, X = 2 => CLC and update $0C-$0D to warp point data to use if Return allowed from current map, SEC otherwise, X = 3 => disembark from ship and update ship position based on last save point ID $48
0x03D2D4|$0F:$D2C4:A5 48   	LDA $48    	; last save point ID
0x03D2D6|$0F:$D2C6:C9 05   	CMP #$05   	; Save Point ID #$05: Rhone Shrine
0x03D2D8|$0F:$D2C8:D0 0E   	BNE $D2D8  
0x03D2DA|$0F:$D2CA:A9 84   	LDA #$84   
0x03D2DC|$0F:$D2CC:8D 2D 06	STA $062D  	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03D2DF|$0F:$D2CF:8D 3F 06	STA $063F  	; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03D2E2|$0F:$D2D2:8D 51 06	STA $0651  	; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03D2E5|$0F:$D2D5:20 7B C7	JSR $C77B  	; restore full HP/MP to all living party members
; control flow target (from $D2C8)
0x03D2E8|$0F:$D2D8:20 AF C7	JSR $C7AF  
0x03D2EB|$0F:$D2DB:4C FB D2	JMP $D2FB  	; load ROM bank 6

; control flow target (from $D179, $D276, $D295)
0x03D2EE|$0F:$D2DE:20 2A C4	JSR $C42A  
0x03D2F1|$0F:$D2E1:20 46 C4	JSR $C446  	; turn screen off, write $800 [space] tiles to PPU $2000, turn screen on
0x03D2F4|$0F:$D2E4:4C 65 C4	JMP $C465  	; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0

; X = 1 => CLC and update $0C-$0D to warp point data to use if Outside allowed from current map, SEC otherwise, X = 2 => CLC and update $0C-$0D to warp point data to use if Return allowed from current map, SEC otherwise, X = 3 => disembark from ship and update ship position based on last save point ID $48
; control flow target (from $D2C1, $D2F1)
; external control flow target (from $06:$8C53, $06:$8CD6)
0x03D2F7|$0F:$D2E7:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03D2FA|$0F:$D2EA:A3	; $06:$8046; -> $06:$BEED: X = 1 => CLC and update $0C-$0D to warp point data to use if Outside allowed from current map, SEC otherwise, X = 2 => CLC and update $0C-$0D to warp point data to use if Return allowed from current map, SEC otherwise, X = 3 => disembark from ship and update ship position based on last save point ID $48

; data -> code
0x03D2FB|$0F:$D2EB:08      	PHP        
0x03D2FC|$0F:$D2EC:20 61 F7	JSR $F761  	; load ROM bank #$06
0x03D2FF|$0F:$D2EF:28      	PLP        
0x03D300|$0F:$D2F0:60      	RTS        

; external control flow target (from $06:$BD62)
0x03D301|$0F:$D2F1:20 E7 D2	JSR $D2E7  	; X = 1 => CLC and update $0C-$0D to warp point data to use if Outside allowed from current map, SEC otherwise, X = 2 => CLC and update $0C-$0D to warp point data to use if Return allowed from current map, SEC otherwise, X = 3 => disembark from ship and update ship position based on last save point ID $48
0x03D304|$0F:$D2F4:4C 61 F7	JMP $F761  	; load ROM bank #$06

; control flow target (from $CF76, $D2A6, $D311, $D3C2, $D4A6, $E4BE, $E9B7)
0x03D307|$0F:$D2F7:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03D30A|$0F:$D2FA:A2	; $06:$8044

; data -> code
; load ROM bank 6
; control flow target (from $C918, $CAFF, $D1C3, $D1E2, $D1F5, $D1FD, $D286, $D2B9, $D2DB, $D340)
0x03D30B|$0F:$D2FB:A9 06   	LDA #$06   
0x03D30D|$0F:$D2FD:85 94   	STA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03D30F|$0F:$D2FF:4C D5 C3	JMP $C3D5  	; save A to $05F6, X to $43, and load bank specified by A

; external control flow target (from $06:$8669, $06:$8CC2, $06:$9420, $06:$9427, $06:$942E, $06:$A225)
0x03D312|$0F:$D302:20 5C F7	JSR $F75C  	; load ROM bank #$00
0x03D315|$0F:$D305:A4 97   	LDY $97    	; subject hero ID $97
0x03D317|$0F:$D307:B9 1F D3	LDA $D31F,Y
; call to code in a different bank ($00:$8003)
0x03D31A|$0F:$D30A:20 03 80	JSR $8003  
0x03D31D|$0F:$D30D:A9 FF   	LDA #$FF   
0x03D31F|$0F:$D30F:85 45   	STA $45    
0x03D321|$0F:$D311:20 F7 D2	JSR $D2F7  
0x03D324|$0F:$D314:20 CB D8	JSR $D8CB  
0x03D327|$0F:$D317:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03D32A|$0F:$D31A:A5 94   	LDA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03D32C|$0F:$D31C:4C D5 C3	JMP $C3D5  	; save A to $05F6, X to $43, and load bank specified by A


; code -> data
; indexed data load target (from $D307)
; indirect data load target
0x03D32F|$0F:$D31F:5C
; indirect data load target
0x03D330|$0F:$D320:61
; indirect data load target
0x03D331|$0F:$D321:66
; indirect data load target
0x03D332|$0F:$D322:58
0x03D333|$0F:$D323:59
; indirect data load target
0x03D334|$0F:$D324:5A

; data -> code
; external control flow target (from $06:$BD0B)
0x03D335|$0F:$D325:20 C5 DE	JSR $DEC5  
0x03D338|$0F:$D328:20 04 C5	JSR $C504  
; control flow target (from $D331)
0x03D33B|$0F:$D32B:4C 61 F7	JMP $F761  	; load ROM bank #$06

; external control flow target (from $06:$BD71)
0x03D33E|$0F:$D32E:20 CB D8	JSR $D8CB  
0x03D341|$0F:$D331:4C 2B D3	JMP $D32B  

; post-Malroth dialogue
; external control flow target (from $06:$80B9)
0x03D344|$0F:$D334:20 5C F7	JSR $F75C  	; load ROM bank #$00
; call to code in a different bank ($00:$8012)
0x03D347|$0F:$D337:20 12 80	JSR $8012  	; return value for $0D for post-Malroth dialogue
0x03D34A|$0F:$D33A:85 0D   	STA $0D    
0x03D34C|$0F:$D33C:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03D34F|$0F:$D33F:43	; $02:$8006; -> $02:$B292: looks like this determines NPC's post-Malroth text

; data -> code
0x03D350|$0F:$D340:4C FB D2	JMP $D2FB  	; load ROM bank 6

; external control flow target (from $06:$BC2A)
0x03D353|$0F:$D343:EA      	NOP        
0x03D354|$0F:$D344:EA      	NOP        
0x03D355|$0F:$D345:EA      	NOP        
0x03D356|$0F:$D346:A9 09   	LDA #$09   
0x03D358|$0F:$D348:85 94   	STA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03D35A|$0F:$D34A:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
; call to code in a different bank ($09:$8000)
0x03D35D|$0F:$D34D:20 00 80	JSR $8000  
; control flow target (from $D353)
0x03D360|$0F:$D350:AD 56 01	LDA $0156  	; probably music playing flag? set to #$00 when music finishes
0x03D363|$0F:$D353:D0 FB   	BNE $D350  
0x03D365|$0F:$D355:78      	SEI        
0x03D366|$0F:$D356:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03D369|$0F:$D359:DF	; $06:$803E

; data -> code
0x03D36A|$0F:$D35A:60      	RTS        

; control flow target (from $E5E1, $E655, $E6D3, $E7B4)
0x03D36B|$0F:$D35B:A5 28   	LDA $28    	; current map X-pos (2)
0x03D36D|$0F:$D35D:85 0C   	STA $0C    
0x03D36F|$0F:$D35F:A5 29   	LDA $29    	; current map Y-pos (2)
0x03D371|$0F:$D361:85 0E   	STA $0E    
0x03D373|$0F:$D363:20 89 DF	JSR $DF89  
0x03D376|$0F:$D366:20 4A DF	JSR $DF4A  
0x03D379|$0F:$D369:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03D37C|$0F:$D36C:A0 04   	LDY #$04   
0x03D37E|$0F:$D36E:B1 10   	LDA ($10),Y
0x03D380|$0F:$D370:29 FC   	AND #$FC   
0x03D382|$0F:$D372:85 3B   	STA $3B    	; high nybble = terrain ID
0x03D384|$0F:$D374:AD AD 61	LDA $61AD  
0x03D387|$0F:$D377:F0 01   	BEQ $D37A  
0x03D389|$0F:$D379:60      	RTS        

; control flow target (from $D377)
0x03D38A|$0F:$D37A:AD BA FF	LDA $FFBA  
0x03D38D|$0F:$D37D:D0 09   	BNE $D388  
0x03D38F|$0F:$D37F:A5 2F   	LDA $2F    	; joypad 1 data
0x03D391|$0F:$D381:29 02   	AND #$02   
0x03D393|$0F:$D383:F0 03   	BEQ $D388  
0x03D395|$0F:$D385:4C 29 D4	JMP $D429  

; control flow target (from $D37D, $D383)
0x03D398|$0F:$D388:A5 CF   	LDA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03D39A|$0F:$D38A:29 04   	AND #$04   
0x03D39C|$0F:$D38C:F0 41   	BEQ $D3CF  
0x03D39E|$0F:$D38E:A5 3B   	LDA $3B    	; high nybble = terrain ID
0x03D3A0|$0F:$D390:29 F0   	AND #$F0   
0x03D3A2|$0F:$D392:C9 40   	CMP #$40   
0x03D3A4|$0F:$D394:D0 03   	BNE $D399  
0x03D3A6|$0F:$D396:4C 29 D4	JMP $D429  

; control flow target (from $D394)
0x03D3A9|$0F:$D399:C9 A0   	CMP #$A0   
0x03D3AB|$0F:$D39B:B0 77   	BCS $D414  
0x03D3AD|$0F:$D39D:A5 CF   	LDA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03D3AF|$0F:$D39F:29 FB   	AND #$FB   
0x03D3B1|$0F:$D3A1:85 CF   	STA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03D3B3|$0F:$D3A3:A5 16   	LDA $16    	; current map X-pos (1)
0x03D3B5|$0F:$D3A5:85 D2   	STA $D2    	; ship X-pos (when you aren't on it)
0x03D3B7|$0F:$D3A7:8D D4 05	STA $05D4  	; NPC #$13 X-pos
0x03D3BA|$0F:$D3AA:A5 17   	LDA $17    	; current map Y-pos (1)
0x03D3BC|$0F:$D3AC:85 D3   	STA $D3    	; ship Y-pos (when you aren't on it)
0x03D3BE|$0F:$D3AE:8D D5 05	STA $05D5  	; NPC #$13 Y-pos
0x03D3C1|$0F:$D3B1:A9 05   	LDA #$05   
0x03D3C3|$0F:$D3B3:8D D9 05	STA $05D9  	; NPC #$13 sprite ID
0x03D3C6|$0F:$D3B6:AD 40 05	LDA $0540  	; NPC #$00 ? + direction nybble
0x03D3C9|$0F:$D3B9:29 03   	AND #$03   
0x03D3CB|$0F:$D3BB:8D D8 05	STA $05D8  	; NPC #$13 motion nybble + direction nybble
0x03D3CE|$0F:$D3BE:A9 01   	LDA #$01   
0x03D3D0|$0F:$D3C0:85 45   	STA $45    
0x03D3D2|$0F:$D3C2:20 F7 D2	JSR $D2F7  
0x03D3D5|$0F:$D3C5:20 2F E3	JSR $E32F  
0x03D3D8|$0F:$D3C8:A9 00   	LDA #$00   
0x03D3DA|$0F:$D3CA:85 38   	STA $38    
0x03D3DC|$0F:$D3CC:4C 29 D4	JMP $D429  

; control flow target (from $D38C)
0x03D3DF|$0F:$D3CF:A5 3B   	LDA $3B    	; high nybble = terrain ID
0x03D3E1|$0F:$D3D1:29 F0   	AND #$F0   
0x03D3E3|$0F:$D3D3:C9 40   	CMP #$40   
0x03D3E5|$0F:$D3D5:D0 21   	BNE $D3F8  
0x03D3E7|$0F:$D3D7:A5 31   	LDA $31    	; current map ID
0x03D3E9|$0F:$D3D9:C9 01   	CMP #$01   	; Map ID #$01: World Map
0x03D3EB|$0F:$D3DB:F0 04   	BEQ $D3E1  
0x03D3ED|$0F:$D3DD:C9 0B   	CMP #$0B   	; Map ID #$0B: Lianport
0x03D3EF|$0F:$D3DF:D0 33   	BNE $D414  
; control flow target (from $D3DB)
0x03D3F1|$0F:$D3E1:AD D4 05	LDA $05D4  	; NPC #$13 X-pos
0x03D3F4|$0F:$D3E4:C5 28   	CMP $28    	; current map X-pos (2)
0x03D3F6|$0F:$D3E6:D0 2C   	BNE $D414  
0x03D3F8|$0F:$D3E8:AD D5 05	LDA $05D5  	; NPC #$13 Y-pos
0x03D3FB|$0F:$D3EB:C5 29   	CMP $29    	; current map Y-pos (2)
0x03D3FD|$0F:$D3ED:D0 25   	BNE $D414  
0x03D3FF|$0F:$D3EF:AD D9 05	LDA $05D9  	; NPC #$13 sprite ID
0x03D402|$0F:$D3F2:C9 FF   	CMP #$FF   
0x03D404|$0F:$D3F4:F0 1E   	BEQ $D414  
0x03D406|$0F:$D3F6:D0 51   	BNE $D449  
; control flow target (from $D3D5)
0x03D408|$0F:$D3F8:A5 3B   	LDA $3B    	; high nybble = terrain ID
0x03D40A|$0F:$D3FA:29 F0   	AND #$F0   
0x03D40C|$0F:$D3FC:C9 A0   	CMP #$A0   
0x03D40E|$0F:$D3FE:D0 10   	BNE $D410  
0x03D410|$0F:$D400:A5 31   	LDA $31    	; current map ID
0x03D412|$0F:$D402:C9 2C   	CMP #$2C   	; Map ID #$2C: Lake Cave B1
0x03D414|$0F:$D404:F0 0E   	BEQ $D414  
0x03D416|$0F:$D406:C9 2D   	CMP #$2D   	; Map ID #$2D: Lake Cave B2
0x03D418|$0F:$D408:F0 0A   	BEQ $D414  
0x03D41A|$0F:$D40A:C9 40   	CMP #$40   
0x03D41C|$0F:$D40C:F0 06   	BEQ $D414  
0x03D41E|$0F:$D40E:D0 19   	BNE $D429  
; control flow target (from $D3FE)
0x03D420|$0F:$D410:C9 B0   	CMP #$B0   
0x03D422|$0F:$D412:90 15   	BCC $D429  
; control flow target (from $D39B, $D3DF, $D3E6, $D3ED, $D3F4, $D404, $D408, $D40C, $D43E)
0x03D424|$0F:$D414:A5 16   	LDA $16    	; current map X-pos (1)
0x03D426|$0F:$D416:85 28   	STA $28    	; current map X-pos (2)
0x03D428|$0F:$D418:A5 17   	LDA $17    	; current map Y-pos (1)
0x03D42A|$0F:$D41A:85 29   	STA $29    	; current map Y-pos (2)
0x03D42C|$0F:$D41C:68      	PLA        
0x03D42D|$0F:$D41D:68      	PLA        
0x03D42E|$0F:$D41E:68      	PLA        
0x03D42F|$0F:$D41F:68      	PLA        
0x03D430|$0F:$D420:A9 00   	LDA #$00   
0x03D432|$0F:$D422:85 03   	STA $03    	; game clock?
0x03D434|$0F:$D424:85 3B   	STA $3B    	; high nybble = terrain ID
0x03D436|$0F:$D426:4C 47 C7	JMP $C747  

; control flow target (from $D385, $D396, $D3CC, $D40E, $D412)
0x03D439|$0F:$D429:A0 18   	LDY #$18   
; control flow target (from $D447)
0x03D43B|$0F:$D42B:B9 41 05	LDA $0541,Y	; NPC #$00 sprite ID
0x03D43E|$0F:$D42E:C9 FF   	CMP #$FF   
0x03D440|$0F:$D430:F0 0E   	BEQ $D440  
0x03D442|$0F:$D432:B9 3C 05	LDA $053C,Y	; NPC #$00 ?
0x03D445|$0F:$D435:C5 28   	CMP $28    	; current map X-pos (2)
0x03D447|$0F:$D437:D0 07   	BNE $D440  
0x03D449|$0F:$D439:B9 3D 05	LDA $053D,Y	; NPC #$00 ?
0x03D44C|$0F:$D43C:C5 29   	CMP $29    	; current map Y-pos (2)
0x03D44E|$0F:$D43E:F0 D4   	BEQ $D414  
; control flow target (from $D430, $D437)
0x03D450|$0F:$D440:98      	TYA        
0x03D451|$0F:$D441:18      	CLC        
0x03D452|$0F:$D442:69 08   	ADC #$08   
0x03D454|$0F:$D444:A8      	TAY        
0x03D455|$0F:$D445:C9 B8   	CMP #$B8   
0x03D457|$0F:$D447:D0 E2   	BNE $D42B  
; control flow target (from $D3F6)
0x03D459|$0F:$D449:A0 00   	LDY #$00   
0x03D45B|$0F:$D44B:20 50 D4	JSR $D450  
0x03D45E|$0F:$D44E:A0 08   	LDY #$08   
; control flow target (from $D44B)
0x03D460|$0F:$D450:B9 42 05	LDA $0542,Y	; NPC #$00 ?
0x03D463|$0F:$D453:19 43 05	ORA $0543,Y	; NPC #$00 ?
0x03D466|$0F:$D456:D0 01   	BNE $D459  
0x03D468|$0F:$D458:60      	RTS        

; control flow target (from $D456)
0x03D469|$0F:$D459:AD 3C 05	LDA $053C  	; NPC #$00 ?
0x03D46C|$0F:$D45C:20 63 D4	JSR $D463  
0x03D46F|$0F:$D45F:C8      	INY        
0x03D470|$0F:$D460:AD 3D 05	LDA $053D  	; NPC #$00 ?
; control flow target (from $D45C)
0x03D473|$0F:$D463:38      	SEC        
0x03D474|$0F:$D464:F9 44 05	SBC $0544,Y	; NPC #$01 ?
0x03D477|$0F:$D467:99 46 05	STA $0546,Y	; NPC #$01 ?
0x03D47A|$0F:$D46A:60      	RTS        

; control flow target (from $C87F)
0x03D47B|$0F:$D46B:A5 CF   	LDA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03D47D|$0F:$D46D:29 04   	AND #$04   
0x03D47F|$0F:$D46F:D0 40   	BNE $D4B1  
0x03D481|$0F:$D471:A5 31   	LDA $31    	; current map ID
0x03D483|$0F:$D473:C9 01   	CMP #$01   	; Map ID #$01: World Map
0x03D485|$0F:$D475:F0 04   	BEQ $D47B  
0x03D487|$0F:$D477:C9 0B   	CMP #$0B   	; Map ID #$0B: Lianport
0x03D489|$0F:$D479:D0 36   	BNE $D4B1  
; control flow target (from $D475)
0x03D48B|$0F:$D47B:AD D4 05	LDA $05D4  	; NPC #$13 X-pos
0x03D48E|$0F:$D47E:C5 16   	CMP $16    	; current map X-pos (1)
0x03D490|$0F:$D480:D0 2F   	BNE $D4B1  
0x03D492|$0F:$D482:AD D5 05	LDA $05D5  	; NPC #$13 Y-pos
0x03D495|$0F:$D485:C5 17   	CMP $17    	; current map Y-pos (1)
0x03D497|$0F:$D487:D0 28   	BNE $D4B1  
0x03D499|$0F:$D489:20 DA D6	JSR $D6DA  
0x03D49C|$0F:$D48C:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03D49F|$0F:$D48F:A9 FF   	LDA #$FF   
0x03D4A1|$0F:$D491:8D D9 05	STA $05D9  	; NPC #$13 sprite ID
0x03D4A4|$0F:$D494:20 5C F7	JSR $F75C  	; load ROM bank #$00
0x03D4A7|$0F:$D497:A9 6B   	LDA #$6B   
; call to code in a different bank ($00:$8003)
0x03D4A9|$0F:$D499:20 03 80	JSR $8003  
0x03D4AC|$0F:$D49C:A9 06   	LDA #$06   
0x03D4AE|$0F:$D49E:05 CF   	ORA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03D4B0|$0F:$D4A0:85 CF   	STA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03D4B2|$0F:$D4A2:A9 FF   	LDA #$FF   
0x03D4B4|$0F:$D4A4:85 45   	STA $45    
0x03D4B6|$0F:$D4A6:20 F7 D2	JSR $D2F7  
0x03D4B9|$0F:$D4A9:20 2F E3	JSR $E32F  
0x03D4BC|$0F:$D4AC:A9 00   	LDA #$00   
0x03D4BE|$0F:$D4AE:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03D4C0|$0F:$D4B0:60      	RTS        

; control flow target (from $D46F, $D479, $D480, $D487)
0x03D4C1|$0F:$D4B1:A5 31   	LDA $31    	; current map ID
0x03D4C3|$0F:$D4B3:C9 0B   	CMP #$0B   	; Map ID #$0B: Lianport
0x03D4C5|$0F:$D4B5:D0 1B   	BNE $D4D2  
0x03D4C7|$0F:$D4B7:A5 16   	LDA $16    	; current map X-pos (1)
0x03D4C9|$0F:$D4B9:C9 19   	CMP #$19   
0x03D4CB|$0F:$D4BB:D0 15   	BNE $D4D2  
0x03D4CD|$0F:$D4BD:A5 17   	LDA $17    	; current map Y-pos (1)
0x03D4CF|$0F:$D4BF:C9 01   	CMP #$01   
0x03D4D1|$0F:$D4C1:D0 0F   	BNE $D4D2  
0x03D4D3|$0F:$D4C3:AD B0 D6	LDA $D6B0  
0x03D4D6|$0F:$D4C6:85 0C   	STA $0C    
0x03D4D8|$0F:$D4C8:AD B1 D6	LDA $D6B1  
0x03D4DB|$0F:$D4CB:85 0D   	STA $0D    
0x03D4DD|$0F:$D4CD:A9 FF   	LDA #$FF   
0x03D4DF|$0F:$D4CF:4C 8F D8	JMP $D88F  	; warp to warp point given by ($0C)

; control flow target (from $D4B5, $D4BB, $D4C1)
0x03D4E2|$0F:$D4D2:A6 3C   	LDX $3C    
0x03D4E4|$0F:$D4D4:A5 3B   	LDA $3B    	; high nybble = terrain ID
0x03D4E6|$0F:$D4D6:29 F0   	AND #$F0   
0x03D4E8|$0F:$D4D8:85 3C   	STA $3C    
0x03D4EA|$0F:$D4DA:A4 31   	LDY $31    	; current map ID
0x03D4EC|$0F:$D4DC:F0 26   	BEQ $D504  	; Map ID #$00: Fake Midenhall
0x03D4EE|$0F:$D4DE:E0 10   	CPX #$10   
0x03D4F0|$0F:$D4E0:F0 0C   	BEQ $D4EE  
0x03D4F2|$0F:$D4E2:C9 10   	CMP #$10   
0x03D4F4|$0F:$D4E4:D0 08   	BNE $D4EE  
0x03D4F6|$0F:$D4E6:A9 82   	LDA #$82   	; Music ID #$82: Stairs SFX
0x03D4F8|$0F:$D4E8:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03D4FB|$0F:$D4EB:4C EE D7	JMP $D7EE  

; control flow target (from $D4E0, $D4E4)
0x03D4FE|$0F:$D4EE:C9 20   	CMP #$20   
0x03D500|$0F:$D4F0:F0 0A   	BEQ $D4FC  
0x03D502|$0F:$D4F2:C9 30   	CMP #$30   
0x03D504|$0F:$D4F4:D0 0E   	BNE $D504  
0x03D506|$0F:$D4F6:20 A2 E5	JSR $E5A2  
0x03D509|$0F:$D4F9:4C A6 D7	JMP $D7A6  

; control flow target (from $D4F0)
0x03D50C|$0F:$D4FC:A9 82   	LDA #$82   	; Music ID #$82: Stairs SFX
0x03D50E|$0F:$D4FE:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03D511|$0F:$D501:4C A6 D7	JMP $D7A6  

; control flow target (from $D4DC, $D4F4)
0x03D514|$0F:$D504:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03D516|$0F:$D506:C9 02   	CMP #$02   
0x03D518|$0F:$D508:B0 3A   	BCS $D544  
0x03D51A|$0F:$D50A:A5 21   	LDA $21    	; map width
0x03D51C|$0F:$D50C:C5 16   	CMP $16    	; current map X-pos (1)
0x03D51E|$0F:$D50E:90 07   	BCC $D517  
0x03D520|$0F:$D510:A5 22   	LDA $22    	; map height
0x03D522|$0F:$D512:C5 17   	CMP $17    	; current map Y-pos (1)
0x03D524|$0F:$D514:90 01   	BCC $D517  
0x03D526|$0F:$D516:60      	RTS        

; control flow target (from $D50E, $D514, $D55E)
0x03D527|$0F:$D517:20 75 F7	JSR $F775  	; load ROM bank #$03
0x03D52A|$0F:$D51A:AD EC D7	LDA $D7EC  	; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E
0x03D52D|$0F:$D51D:85 0C   	STA $0C    
0x03D52F|$0F:$D51F:AD ED D7	LDA $D7ED  
0x03D532|$0F:$D522:85 0D   	STA $0D    
0x03D534|$0F:$D524:A0 00   	LDY #$00   
; control flow target (from $D535, $D539)
0x03D536|$0F:$D526:B1 0C   	LDA ($0C),Y
0x03D538|$0F:$D528:29 7F   	AND #$7F   
0x03D53A|$0F:$D52A:C5 31   	CMP $31    	; current map ID
0x03D53C|$0F:$D52C:F0 0E   	BEQ $D53C  
0x03D53E|$0F:$D52E:A5 0C   	LDA $0C    
0x03D540|$0F:$D530:18      	CLC        
0x03D541|$0F:$D531:69 03   	ADC #$03   
0x03D543|$0F:$D533:85 0C   	STA $0C    
0x03D545|$0F:$D535:90 EF   	BCC $D526  
0x03D547|$0F:$D537:E6 0D   	INC $0D    
0x03D549|$0F:$D539:D0 EB   	BNE $D526  
0x03D54B|$0F:$D53B:60      	RTS        

; control flow target (from $D52C)
0x03D54C|$0F:$D53C:A9 82   	LDA #$82   	; Music ID #$82: Stairs SFX
0x03D54E|$0F:$D53E:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03D551|$0F:$D541:4C B6 D7	JMP $D7B6  

; control flow target (from $D508)
0x03D554|$0F:$D544:A5 16   	LDA $16    	; current map X-pos (1)
0x03D556|$0F:$D546:4A      	LSR        
0x03D557|$0F:$D547:18      	CLC        
0x03D558|$0F:$D548:E5 21   	SBC $21    	; map width
0x03D55A|$0F:$D54A:B0 0B   	BCS $D557  
0x03D55C|$0F:$D54C:A5 17   	LDA $17    	; current map Y-pos (1)
0x03D55E|$0F:$D54E:4A      	LSR        
0x03D55F|$0F:$D54F:18      	CLC        
0x03D560|$0F:$D550:E5 22   	SBC $22    	; map height
0x03D562|$0F:$D552:B0 03   	BCS $D557  
0x03D564|$0F:$D554:4C E9 D5	JMP $D5E9  

; control flow target (from $D54A, $D552)
0x03D567|$0F:$D557:A5 31   	LDA $31    	; current map ID
0x03D569|$0F:$D559:A0 05   	LDY #$05   
; control flow target (from $D561)
0x03D56B|$0F:$D55B:D9 9B D6	CMP $D69B,Y
0x03D56E|$0F:$D55E:F0 B7   	BEQ $D517  
0x03D570|$0F:$D560:88      	DEY        
0x03D571|$0F:$D561:10 F8   	BPL $D55B  
0x03D573|$0F:$D563:AD 40 05	LDA $0540  	; NPC #$00 ? + direction nybble
0x03D576|$0F:$D566:29 03   	AND #$03   
0x03D578|$0F:$D568:AA      	TAX        
0x03D579|$0F:$D569:0A      	ASL        
0x03D57A|$0F:$D56A:A8      	TAY        
0x03D57B|$0F:$D56B:BD A9 D6	LDA $D6A9,X
0x03D57E|$0F:$D56E:85 0F   	STA $0F    
0x03D580|$0F:$D570:B9 A1 D6	LDA $D6A1,Y
0x03D583|$0F:$D573:85 12   	STA $12    
0x03D585|$0F:$D575:85 10   	STA $10    
0x03D587|$0F:$D577:B9 A2 D6	LDA $D6A2,Y
0x03D58A|$0F:$D57A:85 13   	STA $13    
0x03D58C|$0F:$D57C:85 11   	STA $11    
0x03D58E|$0F:$D57E:20 61 F7	JSR $F761  	; load ROM bank #$06
0x03D591|$0F:$D581:A5 0F   	LDA $0F    
0x03D593|$0F:$D583:48      	PHA        
0x03D594|$0F:$D584:A5 10   	LDA $10    
0x03D596|$0F:$D586:48      	PHA        
0x03D597|$0F:$D587:A9 6E   	LDA #$6E   
; call to code in a different bank ($06:$A369)
0x03D599|$0F:$D589:20 69 A3	JSR $A369  	; check for item A in party inventory, returning inventory index of item in A/X if found, #$FF if not
0x03D59C|$0F:$D58C:AA      	TAX        
0x03D59D|$0F:$D58D:68      	PLA        
0x03D59E|$0F:$D58E:85 10   	STA $10    
0x03D5A0|$0F:$D590:68      	PLA        
0x03D5A1|$0F:$D591:85 0F   	STA $0F    
0x03D5A3|$0F:$D593:E0 FF   	CPX #$FF   
0x03D5A5|$0F:$D595:D0 06   	BNE $D59D  
; call to code in a different bank ($06:$8CD4)
0x03D5A7|$0F:$D597:20 D4 8C	JSR $8CD4  	; handler for Outside spell effect
0x03D5AA|$0F:$D59A:4C B6 D5	JMP $D5B6  

; control flow target (from $D595)
; call to code in a different bank ($06:$8CD4)
0x03D5AD|$0F:$D59D:20 D4 8C	JSR $8CD4  	; handler for Outside spell effect
0x03D5B0|$0F:$D5A0:46 0E   	LSR $0E    
0x03D5B2|$0F:$D5A2:F0 12   	BEQ $D5B6  
; control flow target (from $D5B4)
0x03D5B4|$0F:$D5A4:A5 10   	LDA $10    
0x03D5B6|$0F:$D5A6:18      	CLC        
0x03D5B7|$0F:$D5A7:65 12   	ADC $12    
0x03D5B9|$0F:$D5A9:85 12   	STA $12    
0x03D5BB|$0F:$D5AB:A5 11   	LDA $11    
0x03D5BD|$0F:$D5AD:18      	CLC        
0x03D5BE|$0F:$D5AE:65 13   	ADC $13    
0x03D5C0|$0F:$D5B0:85 13   	STA $13    
0x03D5C2|$0F:$D5B2:C6 0E   	DEC $0E    
0x03D5C4|$0F:$D5B4:D0 EE   	BNE $D5A4  
; control flow target (from $D59A, $D5A2)
0x03D5C6|$0F:$D5B6:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03D5C9|$0F:$D5B9:A0 00   	LDY #$00   
0x03D5CB|$0F:$D5BB:B1 0C   	LDA ($0C),Y
0x03D5CD|$0F:$D5BD:85 5A   	STA $5A    	; Crest/direction name write buffer start
0x03D5CF|$0F:$D5BF:C8      	INY        
0x03D5D0|$0F:$D5C0:B1 0C   	LDA ($0C),Y
0x03D5D2|$0F:$D5C2:18      	CLC        
0x03D5D3|$0F:$D5C3:65 12   	ADC $12    
0x03D5D5|$0F:$D5C5:85 5B   	STA $5B    
0x03D5D7|$0F:$D5C7:C8      	INY        
0x03D5D8|$0F:$D5C8:B1 0C   	LDA ($0C),Y
0x03D5DA|$0F:$D5CA:18      	CLC        
0x03D5DB|$0F:$D5CB:65 13   	ADC $13    
0x03D5DD|$0F:$D5CD:85 5C   	STA $5C    
; control flow target (from $D617)
0x03D5DF|$0F:$D5CF:A5 0F   	LDA $0F    
0x03D5E1|$0F:$D5D1:48      	PHA        
0x03D5E2|$0F:$D5D2:20 E1 D6	JSR $D6E1  
0x03D5E5|$0F:$D5D5:A2 28   	LDX #$28   
0x03D5E7|$0F:$D5D7:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03D5EA|$0F:$D5DA:AD 99 D6	LDA $D699  
0x03D5ED|$0F:$D5DD:85 0C   	STA $0C    
0x03D5EF|$0F:$D5DF:AD 9A D6	LDA $D69A  
0x03D5F2|$0F:$D5E2:85 0D   	STA $0D    
0x03D5F4|$0F:$D5E4:68      	PLA        
0x03D5F5|$0F:$D5E5:4C 8F D8	JMP $D88F  	; warp to warp point given by ($0C)

; control flow target (from $D5ED, $D5FA, $D5FE, $D61C, $D620, $D629)
0x03D5F8|$0F:$D5E8:60      	RTS        

; control flow target (from $D554)
0x03D5F9|$0F:$D5E9:A5 31   	LDA $31    	; current map ID
0x03D5FB|$0F:$D5EB:C9 65   	CMP #$65   	; Map ID #$65: Dragon Horn South 6F
0x03D5FD|$0F:$D5ED:B0 F9   	BCS $D5E8  
0x03D5FF|$0F:$D5EF:C9 61   	CMP #$61   	; Map ID #$61: Dragon Horn South 2F
0x03D601|$0F:$D5F1:90 27   	BCC $D61A  
0x03D603|$0F:$D5F3:20 78 D6	JSR $D678  
0x03D606|$0F:$D5F6:A5 0C   	LDA $0C    
0x03D608|$0F:$D5F8:C9 08   	CMP #$08   
0x03D60A|$0F:$D5FA:B0 EC   	BCS $D5E8  
0x03D60C|$0F:$D5FC:C9 04   	CMP #$04   
0x03D60E|$0F:$D5FE:90 E8   	BCC $D5E8  
0x03D610|$0F:$D600:A9 60   	LDA #$60   
0x03D612|$0F:$D602:85 5A   	STA $5A    	; Crest/direction name write buffer start
0x03D614|$0F:$D604:A5 16   	LDA $16    	; current map X-pos (1)
0x03D616|$0F:$D606:85 5B   	STA $5B    
0x03D618|$0F:$D608:A5 17   	LDA $17    	; current map Y-pos (1)
0x03D61A|$0F:$D60A:85 5C   	STA $5C    
; control flow target (from $D675)
0x03D61C|$0F:$D60C:AD 40 05	LDA $0540  	; NPC #$00 ? + direction nybble
0x03D61F|$0F:$D60F:29 03   	AND #$03   
0x03D621|$0F:$D611:A8      	TAY        
0x03D622|$0F:$D612:B9 A9 D6	LDA $D6A9,Y
0x03D625|$0F:$D615:85 0F   	STA $0F    
0x03D627|$0F:$D617:4C CF D5	JMP $D5CF  

; control flow target (from $D5F1)
0x03D62A|$0F:$D61A:C9 40   	CMP #$40   	; Map ID #$40: Spring of Bravery
0x03D62C|$0F:$D61C:B0 CA   	BCS $D5E8  
0x03D62E|$0F:$D61E:C9 38   	CMP #$38   	; Map ID #$38: Cave to Rhone 1F
0x03D630|$0F:$D620:90 C6   	BCC $D5E8  
0x03D632|$0F:$D622:20 78 D6	JSR $D678  
0x03D635|$0F:$D625:A5 0C   	LDA $0C    
0x03D637|$0F:$D627:C9 05   	CMP #$05   
0x03D639|$0F:$D629:D0 BD   	BNE $D5E8  
0x03D63B|$0F:$D62B:A5 31   	LDA $31    	; current map ID
0x03D63D|$0F:$D62D:38      	SEC        
0x03D63E|$0F:$D62E:E9 38   	SBC #$38   	; Map ID #$38: Cave to Rhone 1F
0x03D640|$0F:$D630:AA      	TAX        
0x03D641|$0F:$D631:BD B2 D6	LDA $D6B2,X
0x03D644|$0F:$D634:85 5A   	STA $5A    	; Crest/direction name write buffer start
0x03D646|$0F:$D636:BD BA D6	LDA $D6BA,X
0x03D649|$0F:$D639:20 83 D6	JSR $D683  
0x03D64C|$0F:$D63C:7D CA D6	ADC $D6CA,X
0x03D64F|$0F:$D63F:85 5B   	STA $5B    
0x03D651|$0F:$D641:BD C2 D6	LDA $D6C2,X
0x03D654|$0F:$D644:20 83 D6	JSR $D683  
0x03D657|$0F:$D647:7D D2 D6	ADC $D6D2,X
0x03D65A|$0F:$D64A:85 5C   	STA $5C    
0x03D65C|$0F:$D64C:A5 14   	LDA $14    
0x03D65E|$0F:$D64E:85 0C   	STA $0C    
0x03D660|$0F:$D650:A5 15   	LDA $15    
0x03D662|$0F:$D652:85 0E   	STA $0E    
0x03D664|$0F:$D654:20 FC DD	JSR $DDFC  
0x03D667|$0F:$D657:A9 5F   	LDA #$5F   
0x03D669|$0F:$D659:85 09   	STA $09    
0x03D66B|$0F:$D65B:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03D66E|$0F:$D65E:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03D671|$0F:$D661:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03D674|$0F:$D664:A5 07   	LDA $07    
0x03D676|$0F:$D666:18      	CLC        
0x03D677|$0F:$D667:69 1E   	ADC #$1E   
0x03D679|$0F:$D669:85 07   	STA $07    
0x03D67B|$0F:$D66B:90 02   	BCC $D66F  
0x03D67D|$0F:$D66D:E6 08   	INC $08    
; control flow target (from $D66B)
0x03D67F|$0F:$D66F:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03D682|$0F:$D672:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03D685|$0F:$D675:4C 0C D6	JMP $D60C  

; control flow target (from $D5F3, $D622)
0x03D688|$0F:$D678:A5 16   	LDA $16    	; current map X-pos (1)
0x03D68A|$0F:$D67A:85 0C   	STA $0C    
0x03D68C|$0F:$D67C:A5 17   	LDA $17    	; current map Y-pos (1)
0x03D68E|$0F:$D67E:85 0E   	STA $0E    
0x03D690|$0F:$D680:4C 89 DF	JMP $DF89  

; control flow target (from $D639, $D644)
0x03D693|$0F:$D683:85 0E   	STA $0E    
0x03D695|$0F:$D685:20 AB C3	JSR $C3AB  	; generate a random number and store it in $32-$33 (two passes)
0x03D698|$0F:$D688:A5 32   	LDA $32    	; RNG byte 0
0x03D69A|$0F:$D68A:85 0C   	STA $0C    
0x03D69C|$0F:$D68C:A9 00   	LDA #$00   
0x03D69E|$0F:$D68E:85 0D   	STA $0D    
0x03D6A0|$0F:$D690:85 0F   	STA $0F    
0x03D6A2|$0F:$D692:20 39 C3	JSR $C339  	; 16-bit multiplication: ($10-$11) = ($0C-$0D) * ($0E-$0F); consumes $0C-$0F
0x03D6A5|$0F:$D695:A5 11   	LDA $11    
0x03D6A7|$0F:$D697:0A      	ASL        
0x03D6A8|$0F:$D698:60      	RTS        


; code -> data
; data load target (from $D5DA)
; indirect data load target
0x03D6A9|$0F:$D699:5A
; data load target (from $D5DF)
; indirect data load target
0x03D6AA|$0F:$D69A:00
; indexed data load target (from $D55B)
; indirect data load target
0x03D6AB|$0F:$D69B:38	; Map ID #$38: Cave to Rhone 1F
; indirect data load target
0x03D6AC|$0F:$D69C:49	; Map ID #$49: Moon Tower 1F
; indirect data load target
0x03D6AD|$0F:$D69D:50	; Map ID #$50: Lighthouse 1F
; indirect data load target
0x03D6AE|$0F:$D69E:58	; Map ID #$58: Wind Tower 1F
; indirect data load target
0x03D6AF|$0F:$D69F:60	; Map ID #$60: Dragon Horn South 1F
; indirect data load target
0x03D6B0|$0F:$D6A0:66	; Map ID #$66: Dragon Horn North 1F
; indexed data load target (from $D570)
; indirect data load target
0x03D6B1|$0F:$D6A1:00
; indexed data load target (from $D577)
; indirect data load target
0x03D6B2|$0F:$D6A2:FF
; indirect data load target
0x03D6B3|$0F:$D6A3:01
; indirect data load target
0x03D6B4|$0F:$D6A4:00
; indirect data load target
0x03D6B5|$0F:$D6A5:00
; indirect data load target
0x03D6B6|$0F:$D6A6:01
; indirect data load target
0x03D6B7|$0F:$D6A7:FF
; indirect data load target
0x03D6B8|$0F:$D6A8:00
; indexed data load target (from $D56B, $D612)
; indirect data load target
0x03D6B9|$0F:$D6A9:09
; indirect data load target
0x03D6BA|$0F:$D6AA:04
; indirect data load target
0x03D6BB|$0F:$D6AB:0A
; indirect data load target
0x03D6BC|$0F:$D6AC:03
; indirect data load target
0x03D6BD|$0F:$D6AD:01
; indirect data load target
0x03D6BE|$0F:$D6AE:1E
; indirect data load target
0x03D6BF|$0F:$D6AF:38
; data load target (from $D4C3)
; indirect data load target
0x03D6C0|$0F:$D6B0:AD
; data load target (from $D4C8)
; indirect data load target
0x03D6C1|$0F:$D6B1:D6
; indexed data load target (from $D631)
; indirect data load target
0x03D6C2|$0F:$D6B2:37
; indirect data load target
0x03D6C3|$0F:$D6B3:38
; indirect data load target
0x03D6C4|$0F:$D6B4:38
; indirect data load target
0x03D6C5|$0F:$D6B5:38
; indirect data load target
0x03D6C6|$0F:$D6B6:3B
; indirect data load target
0x03D6C7|$0F:$D6B7:3C
; indirect data load target
0x03D6C8|$0F:$D6B8:3D
; indirect data load target
0x03D6C9|$0F:$D6B9:3E
; indexed data load target (from $D636)
; indirect data load target
0x03D6CA|$0F:$D6BA:08
; indirect data load target
0x03D6CB|$0F:$D6BB:02
; indirect data load target
0x03D6CC|$0F:$D6BC:02
; indirect data load target
0x03D6CD|$0F:$D6BD:02
; indirect data load target
0x03D6CE|$0F:$D6BE:02
; indirect data load target
0x03D6CF|$0F:$D6BF:02
; indirect data load target
0x03D6D0|$0F:$D6C0:08
; indirect data load target
0x03D6D1|$0F:$D6C1:08
; indexed data load target (from $D641)
; indirect data load target
0x03D6D2|$0F:$D6C2:07
; indirect data load target
0x03D6D3|$0F:$D6C3:02
; indirect data load target
0x03D6D4|$0F:$D6C4:02
; indirect data load target
0x03D6D5|$0F:$D6C5:02
; indirect data load target
0x03D6D6|$0F:$D6C6:04
; indirect data load target
0x03D6D7|$0F:$D6C7:03
; indirect data load target
0x03D6D8|$0F:$D6C8:08
; indirect data load target
0x03D6D9|$0F:$D6C9:03
; indexed data load target (from $D63C)
; indirect data load target
0x03D6DA|$0F:$D6CA:02
; indirect data load target
0x03D6DB|$0F:$D6CB:06
; indirect data load target
0x03D6DC|$0F:$D6CC:06
; indirect data load target
0x03D6DD|$0F:$D6CD:06
; indirect data load target
0x03D6DE|$0F:$D6CE:0E
; indirect data load target
0x03D6DF|$0F:$D6CF:0C
; indirect data load target
0x03D6E0|$0F:$D6D0:08
; indirect data load target
0x03D6E1|$0F:$D6D1:12
; indexed data load target (from $D647)
; indirect data load target
0x03D6E2|$0F:$D6D2:02
; indirect data load target
0x03D6E3|$0F:$D6D3:0E
; indirect data load target
0x03D6E4|$0F:$D6D4:0E
; indirect data load target
0x03D6E5|$0F:$D6D5:0E
; indirect data load target
0x03D6E6|$0F:$D6D6:0A
; indirect data load target
0x03D6E7|$0F:$D6D7:30
; indirect data load target
0x03D6E8|$0F:$D6D8:08
; indirect data load target
0x03D6E9|$0F:$D6D9:02

; data -> code
; control flow target (from $D489)
0x03D6EA|$0F:$D6DA:20 CC E3	JSR $E3CC  
0x03D6ED|$0F:$D6DD:A9 10   	LDA #$10   
0x03D6EF|$0F:$D6DF:D0 07   	BNE $D6E8  
; control flow target (from $D5D2)
0x03D6F1|$0F:$D6E1:A9 98   	LDA #$98   	; Music ID #$98: more Watergate? SFX
0x03D6F3|$0F:$D6E3:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03D6F6|$0F:$D6E6:A9 08   	LDA #$08   
; control flow target (from $D6DF)
0x03D6F8|$0F:$D6E8:85 97   	STA $97    	; subject hero ID $97
0x03D6FA|$0F:$D6EA:A9 FF   	LDA #$FF   
0x03D6FC|$0F:$D6EC:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03D6FE|$0F:$D6EE:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03D701|$0F:$D6F1:A9 00   	LDA #$00   
0x03D703|$0F:$D6F3:8D 3A 05	STA $053A  
0x03D706|$0F:$D6F6:8D 3B 05	STA $053B  
0x03D709|$0F:$D6F9:20 CB D8	JSR $D8CB  
0x03D70C|$0F:$D6FC:AD 49 05	LDA $0549  	; NPC #$01 sprite ID
0x03D70F|$0F:$D6FF:48      	PHA        
0x03D710|$0F:$D700:AD 51 05	LDA $0551  	; NPC #$02 sprite ID
0x03D713|$0F:$D703:48      	PHA        
0x03D714|$0F:$D704:20 1D D7	JSR $D71D  
0x03D717|$0F:$D707:20 1D D7	JSR $D71D  
0x03D71A|$0F:$D70A:A9 80   	LDA #$80   
0x03D71C|$0F:$D70C:8D 3A 05	STA $053A  
0x03D71F|$0F:$D70F:A9 6F   	LDA #$6F   
0x03D721|$0F:$D711:8D 3B 05	STA $053B  
0x03D724|$0F:$D714:68      	PLA        
0x03D725|$0F:$D715:8D 51 05	STA $0551  	; NPC #$02 sprite ID
0x03D728|$0F:$D718:68      	PLA        
0x03D729|$0F:$D719:8D 49 05	STA $0549  	; NPC #$01 sprite ID
0x03D72C|$0F:$D71C:60      	RTS        

; control flow target (from $D704, $D707)
0x03D72D|$0F:$D71D:A5 97   	LDA $97    	; subject hero ID $97
0x03D72F|$0F:$D71F:85 49   	STA $49    	; object hero/target/item/string ID $49
; control flow target (from $D733)
0x03D731|$0F:$D721:A0 08   	LDY #$08   
0x03D733|$0F:$D723:20 69 D7	JSR $D769  
0x03D736|$0F:$D726:A0 10   	LDY #$10   
0x03D738|$0F:$D728:20 69 D7	JSR $D769  
0x03D73B|$0F:$D72B:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03D73E|$0F:$D72E:20 CB D8	JSR $D8CB  
0x03D741|$0F:$D731:C6 49   	DEC $49    	; object hero/target/item/string ID $49
0x03D743|$0F:$D733:D0 EC   	BNE $D721  
0x03D745|$0F:$D735:A0 10   	LDY #$10   
0x03D747|$0F:$D737:20 77 D7	JSR $D777  
0x03D74A|$0F:$D73A:A0 08   	LDY #$08   
0x03D74C|$0F:$D73C:20 77 D7	JSR $D777  
0x03D74F|$0F:$D73F:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03D752|$0F:$D742:4C CB D8	JMP $D8CB  

; control flow target (from $D770, $D773)
0x03D755|$0F:$D745:B9 3A 05	LDA $053A,Y
0x03D758|$0F:$D748:38      	SEC        
0x03D759|$0F:$D749:F9 3C 05	SBC $053C,Y	; NPC #$00 ?
0x03D75C|$0F:$D74C:99 3A 05	STA $053A,Y
0x03D75F|$0F:$D74F:A5 97   	LDA $97    	; subject hero ID $97
0x03D761|$0F:$D751:C9 10   	CMP #$10   
0x03D763|$0F:$D753:F0 0A   	BEQ $D75F  
0x03D765|$0F:$D755:B9 3A 05	LDA $053A,Y
0x03D768|$0F:$D758:38      	SEC        
0x03D769|$0F:$D759:F9 3C 05	SBC $053C,Y	; NPC #$00 ?
0x03D76C|$0F:$D75C:99 3A 05	STA $053A,Y
; control flow target (from $D753)
0x03D76F|$0F:$D75F:C8      	INY        
0x03D770|$0F:$D760:60      	RTS        

; control flow target (from $D7A0, $D7A3)
0x03D771|$0F:$D761:B9 34 05	LDA $0534,Y
0x03D774|$0F:$D764:99 3C 05	STA $053C,Y	; NPC #$00 ?
0x03D777|$0F:$D767:C8      	INY        
0x03D778|$0F:$D768:60      	RTS        

; control flow target (from $D723, $D728)
0x03D779|$0F:$D769:B9 41 05	LDA $0541,Y	; NPC #$00 sprite ID
0x03D77C|$0F:$D76C:C9 FF   	CMP #$FF   
0x03D77E|$0F:$D76E:F0 06   	BEQ $D776  
0x03D780|$0F:$D770:20 45 D7	JSR $D745  
0x03D783|$0F:$D773:20 45 D7	JSR $D745  
; control flow target (from $D76E, $D77C)
0x03D786|$0F:$D776:60      	RTS        

; control flow target (from $D737, $D73C)
0x03D787|$0F:$D777:B9 41 05	LDA $0541,Y	; NPC #$00 sprite ID
0x03D78A|$0F:$D77A:C9 FF   	CMP #$FF   
0x03D78C|$0F:$D77C:F0 F8   	BEQ $D776  
0x03D78E|$0F:$D77E:B9 3A 05	LDA $053A,Y
0x03D791|$0F:$D781:C9 80   	CMP #$80   
0x03D793|$0F:$D783:D0 15   	BNE $D79A  
0x03D795|$0F:$D785:B9 3B 05	LDA $053B,Y
0x03D798|$0F:$D788:C9 6F   	CMP #$6F   
0x03D79A|$0F:$D78A:D0 0E   	BNE $D79A  
0x03D79C|$0F:$D78C:A9 FF   	LDA #$FF   
0x03D79E|$0F:$D78E:99 41 05	STA $0541,Y	; NPC #$00 sprite ID
0x03D7A1|$0F:$D791:A9 00   	LDA #$00   
0x03D7A3|$0F:$D793:99 3A 05	STA $053A,Y
0x03D7A6|$0F:$D796:99 3B 05	STA $053B,Y
0x03D7A9|$0F:$D799:60      	RTS        

; control flow target (from $D783, $D78A)
0x03D7AA|$0F:$D79A:B9 38 05	LDA $0538,Y
0x03D7AD|$0F:$D79D:99 40 05	STA $0540,Y	; NPC #$00 ? + direction nybble
0x03D7B0|$0F:$D7A0:20 61 D7	JSR $D761  
0x03D7B3|$0F:$D7A3:4C 61 D7	JMP $D761  

; control flow target (from $D4F9, $D501)
; external control flow target (from $06:$96C6)
0x03D7B6|$0F:$D7A6:20 75 F7	JSR $F775  	; load ROM bank #$03
0x03D7B9|$0F:$D7A9:AD EC D7	LDA $D7EC  	; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E
0x03D7BC|$0F:$D7AC:85 0C   	STA $0C    
0x03D7BE|$0F:$D7AE:AD ED D7	LDA $D7ED  
0x03D7C1|$0F:$D7B1:85 0D   	STA $0D    
0x03D7C3|$0F:$D7B3:20 69 D8	JSR $D869  	; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point
; control flow target (from $D541)
0x03D7C6|$0F:$D7B6:A5 0C   	LDA $0C    
0x03D7C8|$0F:$D7B8:38      	SEC        
0x03D7C9|$0F:$D7B9:ED EC D7	SBC $D7EC  	; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E
0x03D7CC|$0F:$D7BC:85 0C   	STA $0C    
0x03D7CE|$0F:$D7BE:A5 0D   	LDA $0D    
0x03D7D0|$0F:$D7C0:ED ED D7	SBC $D7ED  
0x03D7D3|$0F:$D7C3:85 0D   	STA $0D    
0x03D7D5|$0F:$D7C5:A5 0C   	LDA $0C    
0x03D7D7|$0F:$D7C7:18      	CLC        
0x03D7D8|$0F:$D7C8:6D EA D7	ADC $D7EA  	; -> $02:$A27E: warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13
0x03D7DB|$0F:$D7CB:85 0C   	STA $0C    
0x03D7DD|$0F:$D7CD:A5 0D   	LDA $0D    
0x03D7DF|$0F:$D7CF:6D EB D7	ADC $D7EB  
0x03D7E2|$0F:$D7D2:85 0D   	STA $0D    
0x03D7E4|$0F:$D7D4:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03D7E7|$0F:$D7D7:A0 00   	LDY #$00   
0x03D7E9|$0F:$D7D9:B1 0C   	LDA ($0C),Y
0x03D7EB|$0F:$D7DB:10 03   	BPL $D7E0  
0x03D7ED|$0F:$D7DD:98      	TYA        
0x03D7EE|$0F:$D7DE:F0 57   	BEQ $D837  
; control flow target (from $D7DB)
0x03D7F0|$0F:$D7E0:B1 0C   	LDA ($0C),Y
0x03D7F2|$0F:$D7E2:29 7F   	AND #$7F   
0x03D7F4|$0F:$D7E4:C9 2B   	CMP #$2B   
0x03D7F6|$0F:$D7E6:B0 49   	BCS $D831  
0x03D7F8|$0F:$D7E8:90 4B   	BCC $D835  

; code -> data
; -> $02:$A27E: warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13
; data load target (from $D7C8, $D7F1, $D801)
0x03D7FA|$0F:$D7EA:7E
; data load target (from $D7CF, $D7F6, $D808)
0x03D7FB|$0F:$D7EB:   A2	; $02:$A27E; warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13
; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E
; data load target (from $D51A, $D7A9, $D7B9, $D810)
0x03D7FC|$0F:$D7EC:13
; data load target (from $D51F, $D7AE, $D7C0, $D817)
0x03D7FD|$0F:$D7ED:   BD	; $03:$BD13; warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E

; data -> code
; control flow target (from $D4EB)
0x03D7FE|$0F:$D7EE:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03D801|$0F:$D7F1:AD EA D7	LDA $D7EA  	; -> $02:$A27E: warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13; set $0C-$0D to the bank 2 end of the warp point data
0x03D804|$0F:$D7F4:85 0C   	STA $0C    
0x03D806|$0F:$D7F6:AD EB D7	LDA $D7EB  
0x03D809|$0F:$D7F9:85 0D   	STA $0D    
0x03D80B|$0F:$D7FB:20 69 D8	JSR $D869  	; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point
0x03D80E|$0F:$D7FE:A5 0C   	LDA $0C    	; now that we have the warp point address in $0C-$0D, subtract the original pointer to get the relative offset
0x03D810|$0F:$D800:38      	SEC        
0x03D811|$0F:$D801:ED EA D7	SBC $D7EA  	; -> $02:$A27E: warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13
0x03D814|$0F:$D804:85 0C   	STA $0C    
0x03D816|$0F:$D806:A5 0D   	LDA $0D    
0x03D818|$0F:$D808:ED EB D7	SBC $D7EB  
0x03D81B|$0F:$D80B:85 0D   	STA $0D    
0x03D81D|$0F:$D80D:A5 0C   	LDA $0C    	; and then add the bank 3 pointer to get the corresponding bank 3 end of the warp point data
0x03D81F|$0F:$D80F:18      	CLC        
0x03D820|$0F:$D810:6D EC D7	ADC $D7EC  	; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E
0x03D823|$0F:$D813:85 0C   	STA $0C    
0x03D825|$0F:$D815:A5 0D   	LDA $0D    
0x03D827|$0F:$D817:6D ED D7	ADC $D7ED  
0x03D82A|$0F:$D81A:85 0D   	STA $0D    
; external control flow target (from $06:$9956)
0x03D82C|$0F:$D81C:20 75 F7	JSR $F775  	; load ROM bank #$03
0x03D82F|$0F:$D81F:A0 00   	LDY #$00   
0x03D831|$0F:$D821:B1 0C   	LDA ($0C),Y	; map ID
0x03D833|$0F:$D823:10 04   	BPL $D829  
0x03D835|$0F:$D825:A9 02   	LDA #$02   
0x03D837|$0F:$D827:D0 0E   	BNE $D837  
; control flow target (from $D823)
0x03D839|$0F:$D829:B1 0C   	LDA ($0C),Y	; useless op; A hasn't changed since the last LDA
0x03D83B|$0F:$D82B:29 7F   	AND #$7F   	; useless op; we got here from BPL
0x03D83D|$0F:$D82D:C9 2B   	CMP #$2B   
0x03D83F|$0F:$D82F:B0 04   	BCS $D835  
; control flow target (from $D7E6)
0x03D841|$0F:$D831:A9 04   	LDA #$04   
0x03D843|$0F:$D833:D0 02   	BNE $D837  
; control flow target (from $D7E8, $D82F)
0x03D845|$0F:$D835:A9 03   	LDA #$03   
; control flow target (from $D7DE, $D827, $D833, $D894)
0x03D847|$0F:$D837:85 45   	STA $45    
0x03D849|$0F:$D839:A0 00   	LDY #$00   
0x03D84B|$0F:$D83B:B1 0C   	LDA ($0C),Y	; warp destination map ID
0x03D84D|$0F:$D83D:29 7F   	AND #$7F   
0x03D84F|$0F:$D83F:85 31   	STA $31    	; current map ID
0x03D851|$0F:$D841:C8      	INY        
0x03D852|$0F:$D842:B1 0C   	LDA ($0C),Y	; warp destination X-pos
0x03D854|$0F:$D844:85 16   	STA $16    	; current map X-pos (1)
0x03D856|$0F:$D846:85 28   	STA $28    	; current map X-pos (2)
0x03D858|$0F:$D848:85 2A   	STA $2A    	; current map X-pos pixel, low byte
0x03D85A|$0F:$D84A:C8      	INY        
0x03D85B|$0F:$D84B:B1 0C   	LDA ($0C),Y	; warp destination Y-pos
0x03D85D|$0F:$D84D:85 17   	STA $17    	; current map Y-pos (1)
0x03D85F|$0F:$D84F:85 29   	STA $29    	; current map Y-pos (2)
0x03D861|$0F:$D851:85 2C   	STA $2C    	; current map Y-pos pixel, low byte
0x03D863|$0F:$D853:A9 00   	LDA #$00   
0x03D865|$0F:$D855:85 2B   	STA $2B    	; current map X-pos pixel, high byte
0x03D867|$0F:$D857:85 2D   	STA $2D    	; current map Y-pos pixel, high byte
0x03D869|$0F:$D859:A2 04   	LDX #$04   	; convert 16x16 map positions to pixels
; control flow target (from $D864)
0x03D86B|$0F:$D85B:06 2A   	ASL $2A    	; current map X-pos pixel, low byte
0x03D86D|$0F:$D85D:26 2B   	ROL $2B    	; current map X-pos pixel, high byte
0x03D86F|$0F:$D85F:06 2C   	ASL $2C    	; current map Y-pos pixel, low byte
0x03D871|$0F:$D861:26 2D   	ROL $2D    	; current map Y-pos pixel, high byte
0x03D873|$0F:$D863:CA      	DEX        
0x03D874|$0F:$D864:D0 F5   	BNE $D85B  
0x03D876|$0F:$D866:4C 87 E2	JMP $E287  

; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point
; control flow target (from $D7B3, $D7FB, $D889, $D88D)
0x03D879|$0F:$D869:A0 00   	LDY #$00   
0x03D87B|$0F:$D86B:B1 0C   	LDA ($0C),Y	; Map ID
0x03D87D|$0F:$D86D:29 7F   	AND #$7F   
0x03D87F|$0F:$D86F:C5 31   	CMP $31    	; current map ID
0x03D881|$0F:$D871:D0 0F   	BNE $D882  	; if different map/pos, update $0C-$0D to next index
0x03D883|$0F:$D873:C8      	INY        
0x03D884|$0F:$D874:A5 16   	LDA $16    	; current map X-pos (1)
0x03D886|$0F:$D876:D1 0C   	CMP ($0C),Y
0x03D888|$0F:$D878:D0 08   	BNE $D882  	; if different map/pos, update $0C-$0D to next index
0x03D88A|$0F:$D87A:C8      	INY        
0x03D88B|$0F:$D87B:A5 17   	LDA $17    	; current map Y-pos (1)
0x03D88D|$0F:$D87D:D1 0C   	CMP ($0C),Y
0x03D88F|$0F:$D87F:D0 01   	BNE $D882  	; if different map/pos, update $0C-$0D to next index
0x03D891|$0F:$D881:60      	RTS        

; if different map/pos, update $0C-$0D to next index
; control flow target (from $D871, $D878, $D87F)
0x03D892|$0F:$D882:A5 0C   	LDA $0C    
0x03D894|$0F:$D884:18      	CLC        
0x03D895|$0F:$D885:69 03   	ADC #$03   	; warp data is 3 bytes each
0x03D897|$0F:$D887:85 0C   	STA $0C    
0x03D899|$0F:$D889:90 DE   	BCC $D869  	; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point
0x03D89B|$0F:$D88B:E6 0D   	INC $0D    
0x03D89D|$0F:$D88D:D0 DA   	BNE $D869  	; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point
; warp to warp point given by ($0C)
; control flow target (from $D4CF, $D5E5)
; external control flow target (from $06:$8C39, $06:$8C5F, $06:$BD69)
0x03D89F|$0F:$D88F:48      	PHA        
0x03D8A0|$0F:$D890:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03D8A3|$0F:$D893:68      	PLA        
0x03D8A4|$0F:$D894:4C 37 D8	JMP $D837  

; control flow target (from $E600, $E630, $E694, $E6AE, $E6DD, $E704, $E72E, $E75B, $E791, $E7DB, $E802, $E82C, $E859, $E877)
0x03D8A7|$0F:$D897:A0 08   	LDY #$08   
0x03D8A9|$0F:$D899:20 D1 DB	JSR $DBD1  
0x03D8AC|$0F:$D89C:A0 10   	LDY #$10   
0x03D8AE|$0F:$D89E:20 D1 DB	JSR $DBD1  
0x03D8B1|$0F:$D8A1:A5 03   	LDA $03    	; game clock?
0x03D8B3|$0F:$D8A3:29 0F   	AND #$0F   
0x03D8B5|$0F:$D8A5:D0 24   	BNE $D8CB  
0x03D8B7|$0F:$D8A7:A0 00   	LDY #$00   
0x03D8B9|$0F:$D8A9:B9 49 05	LDA $0549,Y	; NPC #$01 sprite ID
0x03D8BC|$0F:$D8AC:C9 FF   	CMP #$FF   
0x03D8BE|$0F:$D8AE:F0 03   	BEQ $D8B3  
0x03D8C0|$0F:$D8B0:20 E0 DB	JSR $DBE0  
; control flow target (from $D8AE)
0x03D8C3|$0F:$D8B3:A0 08   	LDY #$08   
0x03D8C5|$0F:$D8B5:B9 49 05	LDA $0549,Y	; NPC #$01 sprite ID
0x03D8C8|$0F:$D8B8:C9 FF   	CMP #$FF   
0x03D8CA|$0F:$D8BA:F0 03   	BEQ $D8BF  
0x03D8CC|$0F:$D8BC:20 E0 DB	JSR $DBE0  
; control flow target (from $D8BA)
0x03D8CF|$0F:$D8BF:AD 48 05	LDA $0548  	; NPC #$01 ? + direction nybble
0x03D8D2|$0F:$D8C2:8D 50 05	STA $0550  	; NPC #$02 ? + direction nybble
0x03D8D5|$0F:$D8C5:AD 40 05	LDA $0540  	; NPC #$00 ? + direction nybble
0x03D8D8|$0F:$D8C8:8D 48 05	STA $0548  	; NPC #$01 ? + direction nybble
; control flow target (from $C758, $C827, $C847, $CCDC, $CD6F, $CD7E, $CF5E, $CF64, $D314, $D32E, $D6F9, $D72E, $D742, $D8A5, $E2F2, $E979, $F470, $F865, $FF8A)
0x03D8DB|$0F:$D8CB:A5 8E   	LDA $8E    	; flag for in battle or not (#$FF)?
0x03D8DD|$0F:$D8CD:F0 01   	BEQ $D8D0  
0x03D8DF|$0F:$D8CF:60      	RTS        

; control flow target (from $D8CD)
0x03D8E0|$0F:$D8D0:20 75 F7	JSR $F775  	; load ROM bank #$03
0x03D8E3|$0F:$D8D3:A5 03   	LDA $03    	; game clock?
0x03D8E5|$0F:$D8D5:29 0F   	AND #$0F   
0x03D8E7|$0F:$D8D7:D0 07   	BNE $D8E0  
0x03D8E9|$0F:$D8D9:A5 36   	LDA $36    
0x03D8EB|$0F:$D8DB:18      	CLC        
0x03D8EC|$0F:$D8DC:69 08   	ADC #$08   
0x03D8EE|$0F:$D8DE:85 36   	STA $36    
; control flow target (from $D8D7)
0x03D8F0|$0F:$D8E0:20 68 C4	JSR $C468  	; set every 4th byte of $0200 - $02FC to #$F0
0x03D8F3|$0F:$D8E3:A2 00   	LDX #$00   
0x03D8F5|$0F:$D8E5:A0 00   	LDY #$00   
0x03D8F7|$0F:$D8E7:84 37   	STY $37    
0x03D8F9|$0F:$D8E9:20 9A DC	JSR $DC9A  
0x03D8FC|$0F:$D8EC:A0 08   	LDY #$08   
0x03D8FE|$0F:$D8EE:A2 50   	LDX #$50   
0x03D900|$0F:$D8F0:20 9A DC	JSR $DC9A  
0x03D903|$0F:$D8F3:A0 10   	LDY #$10   
0x03D905|$0F:$D8F5:A2 B0   	LDX #$B0   
0x03D907|$0F:$D8F7:20 9A DC	JSR $DC9A  
0x03D90A|$0F:$D8FA:A5 38   	LDA $38    
0x03D90C|$0F:$D8FC:C9 FF   	CMP #$FF   
0x03D90E|$0F:$D8FE:D0 03   	BNE $D903  
0x03D910|$0F:$D900:4C B6 DB	JMP $DBB6  

; control flow target (from $D8FE)
0x03D913|$0F:$D903:A5 35   	LDA $35    	; flag indicating whether any menu is currently open
0x03D915|$0F:$D905:F0 03   	BEQ $D90A  
0x03D917|$0F:$D907:4C 35 DB	JMP $DB35  

; control flow target (from $D905)
0x03D91A|$0F:$D90A:A5 38   	LDA $38    
0x03D91C|$0F:$D90C:10 02   	BPL $D910  
0x03D91E|$0F:$D90E:29 7F   	AND #$7F   
; control flow target (from $D90C)
0x03D920|$0F:$D910:0A      	ASL        
0x03D921|$0F:$D911:0A      	ASL        
0x03D922|$0F:$D912:0A      	ASL        
0x03D923|$0F:$D913:69 18   	ADC #$18   
0x03D925|$0F:$D915:AA      	TAX        
0x03D926|$0F:$D916:A9 02   	LDA #$02   
0x03D928|$0F:$D918:85 34   	STA $34    
; control flow target (from $DB32)
0x03D92A|$0F:$D91A:BD 41 05	LDA $0541,X	; NPC #$00 sprite ID
0x03D92D|$0F:$D91D:C9 FF   	CMP #$FF   
0x03D92F|$0F:$D91F:D0 03   	BNE $D924  
0x03D931|$0F:$D921:4C 29 DB	JMP $DB29  

; control flow target (from $D91F)
0x03D934|$0F:$D924:A5 03   	LDA $03    	; game clock?
0x03D936|$0F:$D926:29 0F   	AND #$0F   
0x03D938|$0F:$D928:C9 01   	CMP #$01   
0x03D93A|$0F:$D92A:F0 03   	BEQ $D92F  
0x03D93C|$0F:$D92C:4C C4 DA	JMP $DAC4  

; control flow target (from $D92A)
0x03D93F|$0F:$D92F:A5 35   	LDA $35    	; flag indicating whether any menu is currently open
0x03D941|$0F:$D931:F0 1C   	BEQ $D94F  
; control flow target (from $D95C, $D9F9)
0x03D943|$0F:$D933:A5 38   	LDA $38    
0x03D945|$0F:$D935:10 0D   	BPL $D944  
0x03D947|$0F:$D937:DE 3A 05	DEC $053A,X
0x03D94A|$0F:$D93A:BD 3A 05	LDA $053A,X
0x03D94D|$0F:$D93D:C9 FF   	CMP #$FF   
0x03D94F|$0F:$D93F:D0 03   	BNE $D944  
0x03D951|$0F:$D941:DE 3B 05	DEC $053B,X
; control flow target (from $D935, $D93F, $D997)
0x03D954|$0F:$D944:BD 40 05	LDA $0540,X	; NPC #$00 ? + direction nybble
0x03D957|$0F:$D947:29 F3   	AND #$F3   
0x03D959|$0F:$D949:9D 40 05	STA $0540,X	; NPC #$00 ? + direction nybble
0x03D95C|$0F:$D94C:4C 29 DB	JMP $DB29  

; control flow target (from $D931)
0x03D95F|$0F:$D94F:BD 40 05	LDA $0540,X	; NPC #$00 ? + direction nybble
0x03D962|$0F:$D952:29 F0   	AND #$F0   
0x03D964|$0F:$D954:C9 10   	CMP #$10   
0x03D966|$0F:$D956:F0 44   	BEQ $D99C  
0x03D968|$0F:$D958:C9 20   	CMP #$20   
0x03D96A|$0F:$D95A:F0 03   	BEQ $D95F  
0x03D96C|$0F:$D95C:4C 33 D9	JMP $D933  

; control flow target (from $D95A)
0x03D96F|$0F:$D95F:BD 3A 05	LDA $053A,X
0x03D972|$0F:$D962:85 0C   	STA $0C    
0x03D974|$0F:$D964:BD 3B 05	LDA $053B,X
0x03D977|$0F:$D967:85 0D   	STA $0D    
0x03D979|$0F:$D969:20 7A F7	JSR $F77A  	; load ROM bank #$07
0x03D97C|$0F:$D96C:A0 00   	LDY #$00   
0x03D97E|$0F:$D96E:B1 0C   	LDA ($0C),Y
0x03D980|$0F:$D970:10 11   	BPL $D983  
0x03D982|$0F:$D972:BD 40 05	LDA $0540,X	; NPC #$00 ? + direction nybble
0x03D985|$0F:$D975:29 03   	AND #$03   
0x03D987|$0F:$D977:9D 40 05	STA $0540,X	; NPC #$00 ? + direction nybble
0x03D98A|$0F:$D97A:A5 38   	LDA $38    
0x03D98C|$0F:$D97C:29 7F   	AND #$7F   
0x03D98E|$0F:$D97E:85 38   	STA $38    
0x03D990|$0F:$D980:4C 29 DB	JMP $DB29  

; control flow target (from $D970)
0x03D993|$0F:$D983:FE 3A 05	INC $053A,X
0x03D996|$0F:$D986:D0 03   	BNE $D98B  
0x03D998|$0F:$D988:FE 3B 05	INC $053B,X
; control flow target (from $D986)
0x03D99B|$0F:$D98B:BD 40 05	LDA $0540,X	; NPC #$00 ? + direction nybble
0x03D99E|$0F:$D98E:29 F0   	AND #$F0   
0x03D9A0|$0F:$D990:11 0C   	ORA ($0C),Y
0x03D9A2|$0F:$D992:9D 40 05	STA $0540,X	; NPC #$00 ? + direction nybble
0x03D9A5|$0F:$D995:29 08   	AND #$08   
0x03D9A7|$0F:$D997:D0 AB   	BNE $D944  
0x03D9A9|$0F:$D999:4C BC DA	JMP $DABC  

; control flow target (from $D956)
0x03D9AC|$0F:$D99C:20 AB C3	JSR $C3AB  	; generate a random number and store it in $32-$33 (two passes)
0x03D9AF|$0F:$D99F:A5 32   	LDA $32    	; RNG byte 0
0x03D9B1|$0F:$D9A1:29 03   	AND #$03   
0x03D9B3|$0F:$D9A3:85 0C   	STA $0C    
0x03D9B5|$0F:$D9A5:BD 40 05	LDA $0540,X	; NPC #$00 ? + direction nybble
0x03D9B8|$0F:$D9A8:29 F0   	AND #$F0   
0x03D9BA|$0F:$D9AA:05 0C   	ORA $0C    
0x03D9BC|$0F:$D9AC:9D 40 05	STA $0540,X	; NPC #$00 ? + direction nybble
0x03D9BF|$0F:$D9AF:20 F8 DB	JSR $DBF8  
0x03D9C2|$0F:$D9B2:20 03 DC	JSR $DC03  
0x03D9C5|$0F:$D9B5:A5 11   	LDA $11    
0x03D9C7|$0F:$D9B7:F0 04   	BEQ $D9BD  
0x03D9C9|$0F:$D9B9:A5 10   	LDA $10    
0x03D9CB|$0F:$D9BB:D0 3C   	BNE $D9F9  
; control flow target (from $D9B7)
0x03D9CD|$0F:$D9BD:20 18 E2	JSR $E218  
0x03D9D0|$0F:$D9C0:BD 40 05	LDA $0540,X	; NPC #$00 ? + direction nybble
0x03D9D3|$0F:$D9C3:29 03   	AND #$03   
0x03D9D5|$0F:$D9C5:D0 05   	BNE $D9CC  
0x03D9D7|$0F:$D9C7:C6 13   	DEC $13    
0x03D9D9|$0F:$D9C9:4C E0 D9	JMP $D9E0  

; control flow target (from $D9C5)
0x03D9DC|$0F:$D9CC:C9 01   	CMP #$01   
0x03D9DE|$0F:$D9CE:D0 05   	BNE $D9D5  
0x03D9E0|$0F:$D9D0:E6 12   	INC $12    
0x03D9E2|$0F:$D9D2:4C E0 D9	JMP $D9E0  

; control flow target (from $D9CE)
0x03D9E5|$0F:$D9D5:C9 02   	CMP #$02   
0x03D9E7|$0F:$D9D7:D0 05   	BNE $D9DE  
0x03D9E9|$0F:$D9D9:E6 13   	INC $13    
0x03D9EB|$0F:$D9DB:4C E0 D9	JMP $D9E0  

; control flow target (from $D9D7)
0x03D9EE|$0F:$D9DE:C6 12   	DEC $12    
; control flow target (from $D9C9, $D9D2, $D9DB)
0x03D9F0|$0F:$D9E0:A5 38   	LDA $38    
0x03D9F2|$0F:$D9E2:30 32   	BMI $DA16  
0x03D9F4|$0F:$D9E4:A0 0C   	LDY #$0C   
; control flow target (from $D9EE)
0x03D9F6|$0F:$D9E6:A5 31   	LDA $31    	; current map ID
0x03D9F8|$0F:$D9E8:D9 FC D9	CMP $D9FC,Y
0x03D9FB|$0F:$D9EB:F0 05   	BEQ $D9F2  
; control flow target (from $D9F7)
0x03D9FD|$0F:$D9ED:88      	DEY        
0x03D9FE|$0F:$D9EE:10 F6   	BPL $D9E6  
0x03DA00|$0F:$D9F0:30 24   	BMI $DA16  
; control flow target (from $D9EB)
0x03DA02|$0F:$D9F2:A5 13   	LDA $13    
0x03DA04|$0F:$D9F4:D9 09 DA	CMP $DA09,Y
0x03DA07|$0F:$D9F7:D0 F4   	BNE $D9ED  
; control flow target (from $D9BB, $DA1A, $DA20, $DA2B, $DA37)
0x03DA09|$0F:$D9F9:4C 33 D9	JMP $D933  


; code -> data
; indexed data load target (from $D9E8)
0x03DA0C|$0F:$D9FC:15	; Map ID #$15: Beran
0x03DA0D|$0F:$D9FD:0B	; Map ID #$0B: Lianport
0x03DA0E|$0F:$D9FE:0F	; Map ID #$0F: Osterfair
0x03DA0F|$0F:$D9FF:1A	; Map ID #$1A: Shrine SW of Cannock
0x03DA10|$0F:$DA00:10	; Map ID #$10: Zahan
0x03DA11|$0F:$DA01:03	; Map ID #$03: Midenhall 1F
0x03DA12|$0F:$DA02:05	; Map ID #$05: Leftwyne
0x03DA13|$0F:$DA03:06	; Map ID #$06: Cannock
0x03DA14|$0F:$DA04:07	; Map ID #$07: Hamlin
0x03DA15|$0F:$DA05:0B	; Map ID #$0B: Lianport
0x03DA16|$0F:$DA06:0C	; Map ID #$0C: Tantegel
0x03DA17|$0F:$DA07:11	; Map ID #$11: Tuhn
0x03DA18|$0F:$DA08:14	; Map ID #$14: Wellgarth Underground
; indexed data load target (from $D9F4)
; indirect data load target
0x03DA19|$0F:$DA09:10
; indirect data load target
0x03DA1A|$0F:$DA0A:08
; indirect data load target
0x03DA1B|$0F:$DA0B:0D
0x03DA1C|$0F:$DA0C:04
; indirect data load target
0x03DA1D|$0F:$DA0D:08
0x03DA1E|$0F:$DA0E:13
0x03DA1F|$0F:$DA0F:0D
0x03DA20|$0F:$DA10:0F
0x03DA21|$0F:$DA11:0F
; indirect data load target
0x03DA22|$0F:$DA12:14
; indirect data load target
0x03DA23|$0F:$DA13:0C
; indirect data load target
0x03DA24|$0F:$DA14:0E
; indirect data load target
0x03DA25|$0F:$DA15:12

; data -> code
; control flow target (from $D9E2, $D9F0)
0x03DA26|$0F:$DA16:A5 22   	LDA $22    	; map height
0x03DA28|$0F:$DA18:C5 13   	CMP $13    
0x03DA2A|$0F:$DA1A:90 DD   	BCC $D9F9  
0x03DA2C|$0F:$DA1C:A5 21   	LDA $21    	; map width
0x03DA2E|$0F:$DA1E:C5 12   	CMP $12    
0x03DA30|$0F:$DA20:90 D7   	BCC $D9F9  
0x03DA32|$0F:$DA22:20 03 DC	JSR $DC03  
0x03DA35|$0F:$DA25:A5 11   	LDA $11    
0x03DA37|$0F:$DA27:F0 04   	BEQ $DA2D  
0x03DA39|$0F:$DA29:A5 10   	LDA $10    
; control flow target (from $DAA7)
0x03DA3B|$0F:$DA2B:D0 CC   	BNE $D9F9  
; control flow target (from $DA27)
0x03DA3D|$0F:$DA2D:A5 12   	LDA $12    
0x03DA3F|$0F:$DA2F:C5 16   	CMP $16    	; current map X-pos (1)
0x03DA41|$0F:$DA31:D0 06   	BNE $DA39  
0x03DA43|$0F:$DA33:A5 13   	LDA $13    
0x03DA45|$0F:$DA35:C5 17   	CMP $17    	; current map Y-pos (1)
; control flow target (from $DA43, $DA5D, $DA71, $DA88)
0x03DA47|$0F:$DA37:F0 C0   	BEQ $D9F9  
; control flow target (from $DA31)
0x03DA49|$0F:$DA39:A5 12   	LDA $12    
0x03DA4B|$0F:$DA3B:C5 28   	CMP $28    	; current map X-pos (2)
0x03DA4D|$0F:$DA3D:D0 06   	BNE $DA45  
0x03DA4F|$0F:$DA3F:A5 13   	LDA $13    
0x03DA51|$0F:$DA41:C5 29   	CMP $29    	; current map Y-pos (2)
0x03DA53|$0F:$DA43:F0 F2   	BEQ $DA37  
; control flow target (from $DA3D)
0x03DA55|$0F:$DA45:A5 17   	LDA $17    	; current map Y-pos (1)
0x03DA57|$0F:$DA47:18      	CLC        
0x03DA58|$0F:$DA48:6D 45 05	ADC $0545  	; NPC #$01 ?
0x03DA5B|$0F:$DA4B:85 0F   	STA $0F    
0x03DA5D|$0F:$DA4D:A5 16   	LDA $16    	; current map X-pos (1)
0x03DA5F|$0F:$DA4F:18      	CLC        
0x03DA60|$0F:$DA50:6D 44 05	ADC $0544  	; NPC #$01 ?
0x03DA63|$0F:$DA53:85 0E   	STA $0E    
0x03DA65|$0F:$DA55:C5 12   	CMP $12    
0x03DA67|$0F:$DA57:D0 06   	BNE $DA5F  
0x03DA69|$0F:$DA59:A5 0F   	LDA $0F    
0x03DA6B|$0F:$DA5B:C5 13   	CMP $13    
0x03DA6D|$0F:$DA5D:F0 D8   	BEQ $DA37  
; control flow target (from $DA57)
0x03DA6F|$0F:$DA5F:A5 0E   	LDA $0E    
0x03DA71|$0F:$DA61:18      	CLC        
0x03DA72|$0F:$DA62:6D 4C 05	ADC $054C  	; NPC #$02 ?
0x03DA75|$0F:$DA65:C5 12   	CMP $12    
0x03DA77|$0F:$DA67:D0 0A   	BNE $DA73  
0x03DA79|$0F:$DA69:A5 0F   	LDA $0F    
0x03DA7B|$0F:$DA6B:18      	CLC        
0x03DA7C|$0F:$DA6C:6D 4D 05	ADC $054D  	; NPC #$02 ?
0x03DA7F|$0F:$DA6F:C5 13   	CMP $13    
0x03DA81|$0F:$DA71:F0 C4   	BEQ $DA37  
; control flow target (from $DA67)
0x03DA83|$0F:$DA73:A0 18   	LDY #$18   
; control flow target (from $DA91)
0x03DA85|$0F:$DA75:B9 41 05	LDA $0541,Y	; NPC #$00 sprite ID
0x03DA88|$0F:$DA78:C9 FF   	CMP #$FF   
0x03DA8A|$0F:$DA7A:F0 0E   	BEQ $DA8A  
0x03DA8C|$0F:$DA7C:B9 3C 05	LDA $053C,Y	; NPC #$00 ?
0x03DA8F|$0F:$DA7F:C5 12   	CMP $12    
0x03DA91|$0F:$DA81:D0 07   	BNE $DA8A  
0x03DA93|$0F:$DA83:B9 3D 05	LDA $053D,Y	; NPC #$00 ?
0x03DA96|$0F:$DA86:C5 13   	CMP $13    
0x03DA98|$0F:$DA88:F0 AD   	BEQ $DA37  
; control flow target (from $DA7A, $DA81)
0x03DA9A|$0F:$DA8A:98      	TYA        
0x03DA9B|$0F:$DA8B:18      	CLC        
0x03DA9C|$0F:$DA8C:69 08   	ADC #$08   
0x03DA9E|$0F:$DA8E:A8      	TAY        
0x03DA9F|$0F:$DA8F:C9 B8   	CMP #$B8   
0x03DAA1|$0F:$DA91:D0 E2   	BNE $DA75  
0x03DAA3|$0F:$DA93:A5 0D   	LDA $0D    
0x03DAA5|$0F:$DA95:48      	PHA        
0x03DAA6|$0F:$DA96:A5 12   	LDA $12    
0x03DAA8|$0F:$DA98:85 0C   	STA $0C    
0x03DAAA|$0F:$DA9A:A5 13   	LDA $13    
0x03DAAC|$0F:$DA9C:85 0E   	STA $0E    
0x03DAAE|$0F:$DA9E:20 89 DF	JSR $DF89  
0x03DAB1|$0F:$DAA1:20 22 E2	JSR $E222  
0x03DAB4|$0F:$DAA4:68      	PLA        
0x03DAB5|$0F:$DAA5:C5 0D   	CMP $0D    
; control flow target (from $DABA)
0x03DAB7|$0F:$DAA7:D0 82   	BNE $DA2B  
0x03DAB9|$0F:$DAA9:20 4A DF	JSR $DF4A  
0x03DABC|$0F:$DAAC:A0 04   	LDY #$04   
0x03DABE|$0F:$DAAE:B1 10   	LDA ($10),Y
0x03DAC0|$0F:$DAB0:29 F0   	AND #$F0   
0x03DAC2|$0F:$DAB2:F0 08   	BEQ $DABC  
0x03DAC4|$0F:$DAB4:C9 10   	CMP #$10   
0x03DAC6|$0F:$DAB6:F0 04   	BEQ $DABC  
0x03DAC8|$0F:$DAB8:C9 20   	CMP #$20   
0x03DACA|$0F:$DABA:D0 EB   	BNE $DAA7  
; control flow target (from $D999, $DAB2, $DAB6)
0x03DACC|$0F:$DABC:BD 40 05	LDA $0540,X	; NPC #$00 ? + direction nybble
0x03DACF|$0F:$DABF:09 08   	ORA #$08   
0x03DAD1|$0F:$DAC1:9D 40 05	STA $0540,X	; NPC #$00 ? + direction nybble
; control flow target (from $D92C)
0x03DAD4|$0F:$DAC4:BD 40 05	LDA $0540,X	; NPC #$00 ? + direction nybble
0x03DAD7|$0F:$DAC7:29 08   	AND #$08   
0x03DAD9|$0F:$DAC9:F0 5E   	BEQ $DB29  
0x03DADB|$0F:$DACB:A5 35   	LDA $35    	; flag indicating whether any menu is currently open
0x03DADD|$0F:$DACD:D0 5A   	BNE $DB29  
0x03DADF|$0F:$DACF:BD 40 05	LDA $0540,X	; NPC #$00 ? + direction nybble
0x03DAE2|$0F:$DAD2:29 03   	AND #$03   
0x03DAE4|$0F:$DAD4:D0 15   	BNE $DAEB  
0x03DAE6|$0F:$DAD6:BD 3F 05	LDA $053F,X	; NPC #$00 ?
0x03DAE9|$0F:$DAD9:38      	SEC        
0x03DAEA|$0F:$DADA:E9 01   	SBC #$01   
0x03DAEC|$0F:$DADC:29 0F   	AND #$0F   
0x03DAEE|$0F:$DADE:9D 3F 05	STA $053F,X	; NPC #$00 ?
0x03DAF1|$0F:$DAE1:C9 0F   	CMP #$0F   
0x03DAF3|$0F:$DAE3:D0 44   	BNE $DB29  
0x03DAF5|$0F:$DAE5:DE 3D 05	DEC $053D,X	; NPC #$00 ?
0x03DAF8|$0F:$DAE8:4C 29 DB	JMP $DB29  

; control flow target (from $DAD4)
0x03DAFB|$0F:$DAEB:C9 01   	CMP #$01   
0x03DAFD|$0F:$DAED:D0 12   	BNE $DB01  
0x03DAFF|$0F:$DAEF:BD 3E 05	LDA $053E,X	; NPC #$00 ?
0x03DB02|$0F:$DAF2:18      	CLC        
0x03DB03|$0F:$DAF3:69 01   	ADC #$01   
0x03DB05|$0F:$DAF5:29 0F   	AND #$0F   
0x03DB07|$0F:$DAF7:9D 3E 05	STA $053E,X	; NPC #$00 ?
0x03DB0A|$0F:$DAFA:D0 2D   	BNE $DB29  
0x03DB0C|$0F:$DAFC:FE 3C 05	INC $053C,X	; NPC #$00 ?
0x03DB0F|$0F:$DAFF:D0 28   	BNE $DB29  
; control flow target (from $DAED)
0x03DB11|$0F:$DB01:C9 02   	CMP #$02   
0x03DB13|$0F:$DB03:D0 12   	BNE $DB17  
0x03DB15|$0F:$DB05:BD 3F 05	LDA $053F,X	; NPC #$00 ?
0x03DB18|$0F:$DB08:18      	CLC        
0x03DB19|$0F:$DB09:69 01   	ADC #$01   
0x03DB1B|$0F:$DB0B:29 0F   	AND #$0F   
0x03DB1D|$0F:$DB0D:9D 3F 05	STA $053F,X	; NPC #$00 ?
0x03DB20|$0F:$DB10:D0 17   	BNE $DB29  
0x03DB22|$0F:$DB12:FE 3D 05	INC $053D,X	; NPC #$00 ?
0x03DB25|$0F:$DB15:D0 12   	BNE $DB29  
; control flow target (from $DB03)
0x03DB27|$0F:$DB17:BD 3E 05	LDA $053E,X	; NPC #$00 ?
0x03DB2A|$0F:$DB1A:38      	SEC        
0x03DB2B|$0F:$DB1B:E9 01   	SBC #$01   
0x03DB2D|$0F:$DB1D:29 0F   	AND #$0F   
0x03DB2F|$0F:$DB1F:9D 3E 05	STA $053E,X	; NPC #$00 ?
0x03DB32|$0F:$DB22:C9 0F   	CMP #$0F   
0x03DB34|$0F:$DB24:D0 03   	BNE $DB29  
0x03DB36|$0F:$DB26:DE 3C 05	DEC $053C,X	; NPC #$00 ?
; control flow target (from $D921, $D94C, $D980, $DAC9, $DACD, $DAE3, $DAE8, $DAFA, $DAFF, $DB10, $DB15, $DB24)
0x03DB39|$0F:$DB29:8A      	TXA        
0x03DB3A|$0F:$DB2A:18      	CLC        
0x03DB3B|$0F:$DB2B:69 08   	ADC #$08   
0x03DB3D|$0F:$DB2D:AA      	TAX        
0x03DB3E|$0F:$DB2E:C6 34   	DEC $34    
0x03DB40|$0F:$DB30:F0 03   	BEQ $DB35  
0x03DB42|$0F:$DB32:4C 1A D9	JMP $D91A  

; control flow target (from $D907, $DB30)
0x03DB45|$0F:$DB35:A6 3A   	LDX $3A    
; control flow target (from $DBB3)
0x03DB47|$0F:$DB37:BD 41 05	LDA $0541,X	; NPC #$00 sprite ID
0x03DB4A|$0F:$DB3A:C9 FF   	CMP #$FF   
0x03DB4C|$0F:$DB3C:F0 60   	BEQ $DB9E  
0x03DB4E|$0F:$DB3E:20 33 DC	JSR $DC33  
0x03DB51|$0F:$DB41:A5 0E   	LDA $0E    
0x03DB53|$0F:$DB43:18      	CLC        
0x03DB54|$0F:$DB44:69 07   	ADC #$07   
0x03DB56|$0F:$DB46:85 0E   	STA $0E    
0x03DB58|$0F:$DB48:A5 0F   	LDA $0F    
0x03DB5A|$0F:$DB4A:69 00   	ADC #$00   
0x03DB5C|$0F:$DB4C:F0 0A   	BEQ $DB58  
0x03DB5E|$0F:$DB4E:C9 01   	CMP #$01   
0x03DB60|$0F:$DB50:D0 4C   	BNE $DB9E  
0x03DB62|$0F:$DB52:A5 0E   	LDA $0E    
0x03DB64|$0F:$DB54:C9 07   	CMP #$07   
0x03DB66|$0F:$DB56:B0 46   	BCS $DB9E  
; control flow target (from $DB4C)
0x03DB68|$0F:$DB58:20 65 DC	JSR $DC65  
0x03DB6B|$0F:$DB5B:A5 10   	LDA $10    
0x03DB6D|$0F:$DB5D:18      	CLC        
0x03DB6E|$0F:$DB5E:69 0D   	ADC #$0D   
0x03DB70|$0F:$DB60:A5 11   	LDA $11    
0x03DB72|$0F:$DB62:69 00   	ADC #$00   
0x03DB74|$0F:$DB64:D0 38   	BNE $DB9E  
0x03DB76|$0F:$DB66:20 F8 DB	JSR $DBF8  
0x03DB79|$0F:$DB69:20 03 DC	JSR $DC03  
0x03DB7C|$0F:$DB6C:A5 11   	LDA $11    
0x03DB7E|$0F:$DB6E:F0 04   	BEQ $DB74  
0x03DB80|$0F:$DB70:A5 10   	LDA $10    
0x03DB82|$0F:$DB72:D0 2A   	BNE $DB9E  
; control flow target (from $DB6E)
0x03DB84|$0F:$DB74:20 18 E2	JSR $E218  
0x03DB87|$0F:$DB77:A5 0D   	LDA $0D    
0x03DB89|$0F:$DB79:C5 1D   	CMP $1D    
0x03DB8B|$0F:$DB7B:D0 21   	BNE $DB9E  
0x03DB8D|$0F:$DB7D:AD 48 61	LDA $6148  
0x03DB90|$0F:$DB80:85 0E   	STA $0E    
0x03DB92|$0F:$DB82:AD 49 61	LDA $6149  
0x03DB95|$0F:$DB85:85 0F   	STA $0F    
0x03DB97|$0F:$DB87:AD 4A 61	LDA $614A  
0x03DB9A|$0F:$DB8A:85 10   	STA $10    
0x03DB9C|$0F:$DB8C:AD 4B 61	LDA $614B  
0x03DB9F|$0F:$DB8F:85 11   	STA $11    
0x03DBA1|$0F:$DB91:8A      	TXA        
0x03DBA2|$0F:$DB92:A8      	TAY        
0x03DBA3|$0F:$DB93:20 CB DD	JSR $DDCB  
0x03DBA6|$0F:$DB96:20 75 F7	JSR $F775  	; load ROM bank #$03
0x03DBA9|$0F:$DB99:20 DD DC	JSR $DCDD  
0x03DBAC|$0F:$DB9C:98      	TYA        
0x03DBAD|$0F:$DB9D:AA      	TAX        
; control flow target (from $DB3C, $DB50, $DB56, $DB64, $DB72, $DB7B)
0x03DBAE|$0F:$DB9E:8A      	TXA        
0x03DBAF|$0F:$DB9F:18      	CLC        
0x03DBB0|$0F:$DBA0:69 08   	ADC #$08   
0x03DBB2|$0F:$DBA2:AA      	TAX        
0x03DBB3|$0F:$DBA3:E0 B8   	CPX #$B8   
0x03DBB5|$0F:$DBA5:D0 02   	BNE $DBA9  
0x03DBB7|$0F:$DBA7:A2 18   	LDX #$18   
; control flow target (from $DBA5)
0x03DBB9|$0F:$DBA9:E4 3A   	CPX $3A    
0x03DBBB|$0F:$DBAB:F0 09   	BEQ $DBB6  
0x03DBBD|$0F:$DBAD:A5 37   	LDA $37    
0x03DBBF|$0F:$DBAF:C9 0D   	CMP #$0D   
0x03DBC1|$0F:$DBB1:F0 03   	BEQ $DBB6  
0x03DBC3|$0F:$DBB3:4C 37 DB	JMP $DB37  

; control flow target (from $D900, $DBAB, $DBB1)
0x03DBC6|$0F:$DBB6:86 3A   	STX $3A    
0x03DBC8|$0F:$DBB8:A5 03   	LDA $03    	; game clock?
0x03DBCA|$0F:$DBBA:29 0F   	AND #$0F   
0x03DBCC|$0F:$DBBC:D0 12   	BNE $DBD0  
0x03DBCE|$0F:$DBBE:A5 38   	LDA $38    
0x03DBD0|$0F:$DBC0:30 0E   	BMI $DBD0  
0x03DBD2|$0F:$DBC2:E6 38   	INC $38    
0x03DBD4|$0F:$DBC4:E6 38   	INC $38    
0x03DBD6|$0F:$DBC6:A5 38   	LDA $38    
0x03DBD8|$0F:$DBC8:C9 0A   	CMP #$0A   
0x03DBDA|$0F:$DBCA:90 04   	BCC $DBD0  
0x03DBDC|$0F:$DBCC:A9 00   	LDA #$00   
0x03DBDE|$0F:$DBCE:85 38   	STA $38    
; control flow target (from $DBBC, $DBC0, $DBCA)
0x03DBE0|$0F:$DBD0:60      	RTS        

; control flow target (from $D899, $D89E)
0x03DBE1|$0F:$DBD1:20 D4 DB	JSR $DBD4  
; control flow target (from $DBD1)
0x03DBE4|$0F:$DBD4:B9 3A 05	LDA $053A,Y
0x03DBE7|$0F:$DBD7:18      	CLC        
0x03DBE8|$0F:$DBD8:79 3E 05	ADC $053E,Y	; NPC #$00 ?
0x03DBEB|$0F:$DBDB:99 3A 05	STA $053A,Y
0x03DBEE|$0F:$DBDE:C8      	INY        
0x03DBEF|$0F:$DBDF:60      	RTS        

; control flow target (from $D8B0, $D8BC)
0x03DBF0|$0F:$DBE0:20 E3 DB	JSR $DBE3  
; control flow target (from $DBE0)
0x03DBF3|$0F:$DBE3:B9 46 05	LDA $0546,Y	; NPC #$01 ?
0x03DBF6|$0F:$DBE6:38      	SEC        
0x03DBF7|$0F:$DBE7:F9 3E 05	SBC $053E,Y	; NPC #$00 ?
0x03DBFA|$0F:$DBEA:18      	CLC        
0x03DBFB|$0F:$DBEB:79 44 05	ADC $0544,Y	; NPC #$01 ?
0x03DBFE|$0F:$DBEE:99 44 05	STA $0544,Y	; NPC #$01 ?
0x03DC01|$0F:$DBF1:A9 00   	LDA #$00   
0x03DC03|$0F:$DBF3:99 3E 05	STA $053E,Y	; NPC #$00 ?
0x03DC06|$0F:$DBF6:C8      	INY        
0x03DC07|$0F:$DBF7:60      	RTS        

; control flow target (from $D9AF, $DB66)
0x03DC08|$0F:$DBF8:BD 3C 05	LDA $053C,X	; NPC #$00 ?
0x03DC0B|$0F:$DBFB:85 12   	STA $12    
0x03DC0D|$0F:$DBFD:BD 3D 05	LDA $053D,X	; NPC #$00 ?
0x03DC10|$0F:$DC00:85 13   	STA $13    
0x03DC12|$0F:$DC02:60      	RTS        

; control flow target (from $D9B2, $DA22, $DB69)
0x03DC13|$0F:$DC03:A9 00   	LDA #$00   
0x03DC15|$0F:$DC05:85 11   	STA $11    
0x03DC17|$0F:$DC07:A5 12   	LDA $12    
0x03DC19|$0F:$DC09:38      	SEC        
0x03DC1A|$0F:$DC0A:E5 16   	SBC $16    	; current map X-pos (1)
0x03DC1C|$0F:$DC0C:18      	CLC        
0x03DC1D|$0F:$DC0D:69 08   	ADC #$08   
0x03DC1F|$0F:$DC0F:85 0C   	STA $0C    
0x03DC21|$0F:$DC11:C9 10   	CMP #$10   
0x03DC23|$0F:$DC13:90 01   	BCC $DC16  
0x03DC25|$0F:$DC15:60      	RTS        

; control flow target (from $DC13)
0x03DC26|$0F:$DC16:A5 13   	LDA $13    
0x03DC28|$0F:$DC18:38      	SEC        
0x03DC29|$0F:$DC19:E5 17   	SBC $17    	; current map Y-pos (1)
0x03DC2B|$0F:$DC1B:18      	CLC        
0x03DC2C|$0F:$DC1C:69 07   	ADC #$07   
0x03DC2E|$0F:$DC1E:85 0E   	STA $0E    
0x03DC30|$0F:$DC20:C9 0F   	CMP #$0F   
0x03DC32|$0F:$DC22:90 01   	BCC $DC25  
0x03DC34|$0F:$DC24:60      	RTS        

; control flow target (from $DC22)
0x03DC35|$0F:$DC25:20 31 DE	JSR $DE31  
0x03DC38|$0F:$DC28:A0 00   	LDY #$00   
0x03DC3A|$0F:$DC2A:B1 07   	LDA ($07),Y
0x03DC3C|$0F:$DC2C:85 10   	STA $10    
0x03DC3E|$0F:$DC2E:A9 FF   	LDA #$FF   
0x03DC40|$0F:$DC30:85 11   	STA $11    
0x03DC42|$0F:$DC32:60      	RTS        

; control flow target (from $DB3E)
0x03DC43|$0F:$DC33:BD 3C 05	LDA $053C,X	; NPC #$00 ?
0x03DC46|$0F:$DC36:85 0F   	STA $0F    
0x03DC48|$0F:$DC38:A9 00   	LDA #$00   
0x03DC4A|$0F:$DC3A:46 0F   	LSR $0F    
0x03DC4C|$0F:$DC3C:6A      	ROR        
0x03DC4D|$0F:$DC3D:46 0F   	LSR $0F    
0x03DC4F|$0F:$DC3F:6A      	ROR        
0x03DC50|$0F:$DC40:46 0F   	LSR $0F    
0x03DC52|$0F:$DC42:6A      	ROR        
0x03DC53|$0F:$DC43:46 0F   	LSR $0F    
0x03DC55|$0F:$DC45:6A      	ROR        
0x03DC56|$0F:$DC46:1D 3E 05	ORA $053E,X	; NPC #$00 ?
0x03DC59|$0F:$DC49:38      	SEC        
0x03DC5A|$0F:$DC4A:E5 2A   	SBC $2A    	; current map X-pos pixel, low byte
0x03DC5C|$0F:$DC4C:49 80   	EOR #$80   
0x03DC5E|$0F:$DC4E:85 0E   	STA $0E    
0x03DC60|$0F:$DC50:A5 0F   	LDA $0F    
0x03DC62|$0F:$DC52:E5 2B   	SBC $2B    	; current map X-pos pixel, high byte
0x03DC64|$0F:$DC54:85 0F   	STA $0F    
0x03DC66|$0F:$DC56:A5 0E   	LDA $0E    
0x03DC68|$0F:$DC58:8D 48 61	STA $6148  
0x03DC6B|$0F:$DC5B:30 02   	BMI $DC5F  
0x03DC6D|$0F:$DC5D:E6 0F   	INC $0F    
; control flow target (from $DC5B)
0x03DC6F|$0F:$DC5F:A5 0F   	LDA $0F    
0x03DC71|$0F:$DC61:8D 49 61	STA $6149  
0x03DC74|$0F:$DC64:60      	RTS        

; control flow target (from $DB58)
0x03DC75|$0F:$DC65:BD 3D 05	LDA $053D,X	; NPC #$00 ?
0x03DC78|$0F:$DC68:85 11   	STA $11    
0x03DC7A|$0F:$DC6A:A9 00   	LDA #$00   
0x03DC7C|$0F:$DC6C:46 11   	LSR $11    
0x03DC7E|$0F:$DC6E:6A      	ROR        
0x03DC7F|$0F:$DC6F:46 11   	LSR $11    
0x03DC81|$0F:$DC71:6A      	ROR        
0x03DC82|$0F:$DC72:46 11   	LSR $11    
0x03DC84|$0F:$DC74:6A      	ROR        
0x03DC85|$0F:$DC75:46 11   	LSR $11    
0x03DC87|$0F:$DC77:6A      	ROR        
0x03DC88|$0F:$DC78:1D 3F 05	ORA $053F,X	; NPC #$00 ?
0x03DC8B|$0F:$DC7B:38      	SEC        
0x03DC8C|$0F:$DC7C:E5 2C   	SBC $2C    	; current map Y-pos pixel, low byte
0x03DC8E|$0F:$DC7E:85 10   	STA $10    
0x03DC90|$0F:$DC80:A5 11   	LDA $11    
0x03DC92|$0F:$DC82:E5 2D   	SBC $2D    	; current map Y-pos pixel, high byte
0x03DC94|$0F:$DC84:85 11   	STA $11    
0x03DC96|$0F:$DC86:A5 10   	LDA $10    
0x03DC98|$0F:$DC88:18      	CLC        
0x03DC99|$0F:$DC89:69 6F   	ADC #$6F   
0x03DC9B|$0F:$DC8B:85 10   	STA $10    
0x03DC9D|$0F:$DC8D:8D 4A 61	STA $614A  
0x03DCA0|$0F:$DC90:90 02   	BCC $DC94  
0x03DCA2|$0F:$DC92:E6 11   	INC $11    
; control flow target (from $DC90)
0x03DCA4|$0F:$DC94:A5 11   	LDA $11    
0x03DCA6|$0F:$DC96:8D 4B 61	STA $614B  
0x03DCA9|$0F:$DC99:60      	RTS        

; control flow target (from $D8E9, $D8F0, $D8F7)
0x03DCAA|$0F:$DC9A:8A      	TXA        
0x03DCAB|$0F:$DC9B:48      	PHA        
0x03DCAC|$0F:$DC9C:20 75 F7	JSR $F775  	; load ROM bank #$03
0x03DCAF|$0F:$DC9F:68      	PLA        
0x03DCB0|$0F:$DCA0:AA      	TAX        
0x03DCB1|$0F:$DCA1:B9 3A 05	LDA $053A,Y
0x03DCB4|$0F:$DCA4:19 3B 05	ORA $053B,Y
0x03DCB7|$0F:$DCA7:F0 23   	BEQ $DCCC  
0x03DCB9|$0F:$DCA9:B9 3A 05	LDA $053A,Y
0x03DCBC|$0F:$DCAC:4A      	LSR        
0x03DCBD|$0F:$DCAD:4A      	LSR        
0x03DCBE|$0F:$DCAE:4A      	LSR        
0x03DCBF|$0F:$DCAF:4A      	LSR        
0x03DCC0|$0F:$DCB0:85 0C   	STA $0C    
0x03DCC2|$0F:$DCB2:B9 3B 05	LDA $053B,Y
0x03DCC5|$0F:$DCB5:4A      	LSR        
0x03DCC6|$0F:$DCB6:4A      	LSR        
0x03DCC7|$0F:$DCB7:4A      	LSR        
0x03DCC8|$0F:$DCB8:4A      	LSR        
0x03DCC9|$0F:$DCB9:85 0E   	STA $0E    
0x03DCCB|$0F:$DCBB:E6 0E   	INC $0E    
0x03DCCD|$0F:$DCBD:20 31 DE	JSR $DE31  
0x03DCD0|$0F:$DCC0:84 0C   	STY $0C    
0x03DCD2|$0F:$DCC2:A0 00   	LDY #$00   
0x03DCD4|$0F:$DCC4:B1 07   	LDA ($07),Y
0x03DCD6|$0F:$DCC6:A4 0C   	LDY $0C    
0x03DCD8|$0F:$DCC8:C9 00   	CMP #$00   
0x03DCDA|$0F:$DCCA:F0 01   	BEQ $DCCD  
; control flow target (from $DCA7)
0x03DCDC|$0F:$DCCC:60      	RTS        

; control flow target (from $DCCA)
0x03DCDD|$0F:$DCCD:B9 3A 05	LDA $053A,Y
0x03DCE0|$0F:$DCD0:85 0E   	STA $0E    
0x03DCE2|$0F:$DCD2:B9 3B 05	LDA $053B,Y
0x03DCE5|$0F:$DCD5:85 10   	STA $10    
0x03DCE7|$0F:$DCD7:A9 00   	LDA #$00   
0x03DCE9|$0F:$DCD9:85 0F   	STA $0F    
0x03DCEB|$0F:$DCDB:85 11   	STA $11    
; control flow target (from $DB99)
0x03DCED|$0F:$DCDD:20 3F DD	JSR $DD3F  
0x03DCF0|$0F:$DCE0:98      	TYA        
0x03DCF1|$0F:$DCE1:48      	PHA        
0x03DCF2|$0F:$DCE2:A9 00   	LDA #$00   
0x03DCF4|$0F:$DCE4:A8      	TAY        
0x03DCF5|$0F:$DCE5:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03DCF7|$0F:$DCE7:F0 02   	BEQ $DCEB  
0x03DCF9|$0F:$DCE9:A9 FC   	LDA #$FC   
; control flow target (from $DCE7)
0x03DCFB|$0F:$DCEB:85 0C   	STA $0C    
; control flow target (from $DD38)
0x03DCFD|$0F:$DCED:A9 00   	LDA #$00   
0x03DCFF|$0F:$DCEF:85 0D   	STA $0D    
; control flow target (from $DD2D)
0x03DD01|$0F:$DCF1:A5 0E   	LDA $0E    
0x03DD03|$0F:$DCF3:18      	CLC        
0x03DD04|$0F:$DCF4:65 0D   	ADC $0D    
0x03DD06|$0F:$DCF6:9D 03 02	STA $0203,X
0x03DD09|$0F:$DCF9:A5 0F   	LDA $0F    
0x03DD0B|$0F:$DCFB:69 00   	ADC #$00   
0x03DD0D|$0F:$DCFD:D0 23   	BNE $DD22  
0x03DD0F|$0F:$DCFF:A5 10   	LDA $10    
0x03DD11|$0F:$DD01:18      	CLC        
0x03DD12|$0F:$DD02:65 0C   	ADC $0C    
0x03DD14|$0F:$DD04:9D 00 02	STA $0200,X	; sprite buffer start
0x03DD17|$0F:$DD07:B1 12   	LDA ($12),Y
0x03DD19|$0F:$DD09:9D 01 02	STA $0201,X
0x03DD1C|$0F:$DD0C:C8      	INY        
0x03DD1D|$0F:$DD0D:A5 6D   	LDA $6D    
0x03DD1F|$0F:$DD0F:C9 03   	CMP #$03   
0x03DD21|$0F:$DD11:B0 05   	BCS $DD18  
0x03DD23|$0F:$DD13:20 75 DD	JSR $DD75  
0x03DD26|$0F:$DD16:B0 02   	BCS $DD1A  
; control flow target (from $DD11)
0x03DD28|$0F:$DD18:B1 12   	LDA ($12),Y
; control flow target (from $DD16)
0x03DD2A|$0F:$DD1A:88      	DEY        
0x03DD2B|$0F:$DD1B:9D 02 02	STA $0202,X
0x03DD2E|$0F:$DD1E:E8      	INX        
0x03DD2F|$0F:$DD1F:E8      	INX        
0x03DD30|$0F:$DD20:E8      	INX        
0x03DD31|$0F:$DD21:E8      	INX        
; control flow target (from $DCFD)
0x03DD32|$0F:$DD22:C8      	INY        
0x03DD33|$0F:$DD23:C8      	INY        
0x03DD34|$0F:$DD24:A5 0D   	LDA $0D    
0x03DD36|$0F:$DD26:18      	CLC        
0x03DD37|$0F:$DD27:69 08   	ADC #$08   
0x03DD39|$0F:$DD29:85 0D   	STA $0D    
0x03DD3B|$0F:$DD2B:C9 10   	CMP #$10   
0x03DD3D|$0F:$DD2D:D0 C2   	BNE $DCF1  
0x03DD3F|$0F:$DD2F:A5 0C   	LDA $0C    
0x03DD41|$0F:$DD31:18      	CLC        
0x03DD42|$0F:$DD32:69 08   	ADC #$08   
0x03DD44|$0F:$DD34:85 0C   	STA $0C    
0x03DD46|$0F:$DD36:C9 0C   	CMP #$0C   
0x03DD48|$0F:$DD38:90 B3   	BCC $DCED  
0x03DD4A|$0F:$DD3A:68      	PLA        
0x03DD4B|$0F:$DD3B:A8      	TAY        
0x03DD4C|$0F:$DD3C:60      	RTS        


; code -> data
; data load target (from $DD65)
0x03DD4D|$0F:$DD3D:F7
; data load target (from $DD6D)
0x03DD4E|$0F:$DD3E:   B8	; $03:$B8F7

; data -> code
; control flow target (from $DCDD)
0x03DD4F|$0F:$DD3F:A9 00   	LDA #$00   
0x03DD51|$0F:$DD41:85 13   	STA $13    
0x03DD53|$0F:$DD43:B9 40 05	LDA $0540,Y	; NPC #$00 ? + direction nybble
0x03DD56|$0F:$DD46:29 03   	AND #$03   
0x03DD58|$0F:$DD48:85 12   	STA $12    
0x03DD5A|$0F:$DD4A:B9 41 05	LDA $0541,Y	; NPC #$00 sprite ID
0x03DD5D|$0F:$DD4D:85 6D   	STA $6D    
0x03DD5F|$0F:$DD4F:0A      	ASL        
0x03DD60|$0F:$DD50:0A      	ASL        
0x03DD61|$0F:$DD51:05 12   	ORA $12    
0x03DD63|$0F:$DD53:0A      	ASL        
0x03DD64|$0F:$DD54:0A      	ASL        
0x03DD65|$0F:$DD55:0A      	ASL        
0x03DD66|$0F:$DD56:26 13   	ROL $13    
0x03DD68|$0F:$DD58:0A      	ASL        
0x03DD69|$0F:$DD59:26 13   	ROL $13    
0x03DD6B|$0F:$DD5B:85 12   	STA $12    
0x03DD6D|$0F:$DD5D:A5 36   	LDA $36    
0x03DD6F|$0F:$DD5F:29 08   	AND #$08   
0x03DD71|$0F:$DD61:05 12   	ORA $12    
0x03DD73|$0F:$DD63:85 12   	STA $12    
0x03DD75|$0F:$DD65:AD 3D DD	LDA $DD3D  
0x03DD78|$0F:$DD68:18      	CLC        
0x03DD79|$0F:$DD69:65 12   	ADC $12    
0x03DD7B|$0F:$DD6B:85 12   	STA $12    
0x03DD7D|$0F:$DD6D:AD 3E DD	LDA $DD3E  
0x03DD80|$0F:$DD70:65 13   	ADC $13    
0x03DD82|$0F:$DD72:85 13   	STA $13    
0x03DD84|$0F:$DD74:60      	RTS        

; control flow target (from $DD13)
0x03DD85|$0F:$DD75:48      	PHA        
0x03DD86|$0F:$DD76:AD AD 61	LDA $61AD  
0x03DD89|$0F:$DD79:D0 45   	BNE $DDC0  
0x03DD8B|$0F:$DD7B:68      	PLA        
0x03DD8C|$0F:$DD7C:D0 0E   	BNE $DD8C  
0x03DD8E|$0F:$DD7E:AD 2D 06	LDA $062D  	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03DD91|$0F:$DD81:29 04   	AND #$04   
0x03DD93|$0F:$DD83:F0 25   	BEQ $DDAA  
0x03DD95|$0F:$DD85:AD 2D 06	LDA $062D  	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03DD98|$0F:$DD88:10 22   	BPL $DDAC  
0x03DD9A|$0F:$DD8A:18      	CLC        
0x03DD9B|$0F:$DD8B:60      	RTS        

; control flow target (from $DD7C)
0x03DD9C|$0F:$DD8C:C9 02   	CMP #$02   
0x03DD9E|$0F:$DD8E:F0 0E   	BEQ $DD9E  
0x03DDA0|$0F:$DD90:AD 3F 06	LDA $063F  	; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03DDA3|$0F:$DD93:29 04   	AND #$04   
0x03DDA5|$0F:$DD95:F0 13   	BEQ $DDAA  
0x03DDA7|$0F:$DD97:AD 3F 06	LDA $063F  	; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03DDAA|$0F:$DD9A:10 10   	BPL $DDAC  
0x03DDAC|$0F:$DD9C:18      	CLC        
0x03DDAD|$0F:$DD9D:60      	RTS        

; control flow target (from $DD8E)
0x03DDAE|$0F:$DD9E:AD 51 06	LDA $0651  	; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03DDB1|$0F:$DDA1:29 04   	AND #$04   
0x03DDB3|$0F:$DDA3:F0 05   	BEQ $DDAA  
0x03DDB5|$0F:$DDA5:AD 51 06	LDA $0651  	; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03DDB8|$0F:$DDA8:10 02   	BPL $DDAC  
; control flow target (from $DD83, $DD95, $DDA3, $DDC5)
0x03DDBA|$0F:$DDAA:18      	CLC        
0x03DDBB|$0F:$DDAB:60      	RTS        

; control flow target (from $DD88, $DD9A, $DDA8)
0x03DDBC|$0F:$DDAC:A5 27   	LDA $27    	; map palette; offset from ($E27C)
0x03DDBE|$0F:$DDAE:C9 68   	CMP #$68   
0x03DDC0|$0F:$DDB0:F0 06   	BEQ $DDB8  
0x03DDC2|$0F:$DDB2:B1 12   	LDA ($12),Y
0x03DDC4|$0F:$DDB4:29 FC   	AND #$FC   
0x03DDC6|$0F:$DDB6:38      	SEC        
0x03DDC7|$0F:$DDB7:60      	RTS        

; control flow target (from $DDB0)
0x03DDC8|$0F:$DDB8:B1 12   	LDA ($12),Y
0x03DDCA|$0F:$DDBA:29 FC   	AND #$FC   
0x03DDCC|$0F:$DDBC:09 03   	ORA #$03   
0x03DDCE|$0F:$DDBE:38      	SEC        
0x03DDCF|$0F:$DDBF:60      	RTS        

; control flow target (from $DD79)
0x03DDD0|$0F:$DDC0:68      	PLA        
0x03DDD1|$0F:$DDC1:F0 04   	BEQ $DDC7  
0x03DDD3|$0F:$DDC3:C9 01   	CMP #$01   
0x03DDD5|$0F:$DDC5:D0 E3   	BNE $DDAA  
; control flow target (from $DDC1)
0x03DDD7|$0F:$DDC7:A9 03   	LDA #$03   
0x03DDD9|$0F:$DDC9:38      	SEC        
0x03DDDA|$0F:$DDCA:60      	RTS        

; control flow target (from $DB93)
0x03DDDB|$0F:$DDCB:E6 39   	INC $39    
0x03DDDD|$0F:$DDCD:A5 39   	LDA $39    
0x03DDDF|$0F:$DDCF:C9 0D   	CMP #$0D   
0x03DDE1|$0F:$DDD1:90 04   	BCC $DDD7  
0x03DDE3|$0F:$DDD3:A9 00   	LDA #$00   
0x03DDE5|$0F:$DDD5:85 39   	STA $39    
; control flow target (from $DDD1)
0x03DDE7|$0F:$DDD7:18      	CLC        
0x03DDE8|$0F:$DDD8:65 37   	ADC $37    
0x03DDEA|$0F:$DDDA:AA      	TAX        
0x03DDEB|$0F:$DDDB:BD E2 DD	LDA $DDE2,X
0x03DDEE|$0F:$DDDE:AA      	TAX        
0x03DDEF|$0F:$DDDF:E6 37   	INC $37    
0x03DDF1|$0F:$DDE1:60      	RTS        


; code -> data
; indexed data load target (from $DDDB)
0x03DDF2|$0F:$DDE2:90
0x03DDF3|$0F:$DDE3:40
0x03DDF4|$0F:$DDE4:E0
0x03DDF5|$0F:$DDE5:30
0x03DDF6|$0F:$DDE6:80
0x03DDF7|$0F:$DDE7:D0
0x03DDF8|$0F:$DDE8:10
0x03DDF9|$0F:$DDE9:C0
0x03DDFA|$0F:$DDEA:70
0x03DDFB|$0F:$DDEB:20
0x03DDFC|$0F:$DDEC:F0
0x03DDFD|$0F:$DDED:60
0x03DDFE|$0F:$DDEE:A0
0x03DDFF|$0F:$DDEF:90
0x03DE00|$0F:$DDF0:40
0x03DE01|$0F:$DDF1:E0
0x03DE02|$0F:$DDF2:30
0x03DE03|$0F:$DDF3:80
0x03DE04|$0F:$DDF4:D0
0x03DE05|$0F:$DDF5:10
0x03DE06|$0F:$DDF6:C0
0x03DE07|$0F:$DDF7:70
0x03DE08|$0F:$DDF8:20
0x03DE09|$0F:$DDF9:F0
; indirect data load target
0x03DE0A|$0F:$DDFA:60
; indirect data load target
0x03DE0B|$0F:$DDFB:A0

; data -> code
; control flow target (from $D654)
0x03DE0C|$0F:$DDFC:06 0C   	ASL $0C    
0x03DE0E|$0F:$DDFE:06 0E   	ASL $0E    
; control flow target (from $EB07)
; external control flow target (from $02:$B119)
0x03DE10|$0F:$DE00:A5 0E   	LDA $0E    
0x03DE12|$0F:$DE02:85 08   	STA $08    
0x03DE14|$0F:$DE04:A9 00   	LDA #$00   
0x03DE16|$0F:$DE06:46 08   	LSR $08    
0x03DE18|$0F:$DE08:6A      	ROR        
0x03DE19|$0F:$DE09:46 08   	LSR $08    
0x03DE1B|$0F:$DE0B:6A      	ROR        
0x03DE1C|$0F:$DE0C:46 08   	LSR $08    
0x03DE1E|$0F:$DE0E:6A      	ROR        
0x03DE1F|$0F:$DE0F:85 07   	STA $07    
0x03DE21|$0F:$DE11:A5 0C   	LDA $0C    
0x03DE23|$0F:$DE13:29 1F   	AND #$1F   
0x03DE25|$0F:$DE15:18      	CLC        
0x03DE26|$0F:$DE16:65 07   	ADC $07    
0x03DE28|$0F:$DE18:85 07   	STA $07    
0x03DE2A|$0F:$DE1A:08      	PHP        
0x03DE2B|$0F:$DE1B:A5 0C   	LDA $0C    
0x03DE2D|$0F:$DE1D:29 20   	AND #$20   
0x03DE2F|$0F:$DE1F:D0 04   	BNE $DE25  
0x03DE31|$0F:$DE21:A9 20   	LDA #$20   
0x03DE33|$0F:$DE23:D0 02   	BNE $DE27  
; control flow target (from $DE1F)
0x03DE35|$0F:$DE25:A9 24   	LDA #$24   
; control flow target (from $DE23)
0x03DE37|$0F:$DE27:28      	PLP        
0x03DE38|$0F:$DE28:65 08   	ADC $08    
0x03DE3A|$0F:$DE2A:85 08   	STA $08    
0x03DE3C|$0F:$DE2C:60      	RTS        

; control flow target (from $D082, $F441)
0x03DE3D|$0F:$DE2D:46 0C   	LSR $0C    
0x03DE3F|$0F:$DE2F:46 0E   	LSR $0E    
; control flow target (from $DC25, $DCBD, $F7E3)
0x03DE41|$0F:$DE31:A5 0E   	LDA $0E    
0x03DE43|$0F:$DE33:0A      	ASL        
0x03DE44|$0F:$DE34:0A      	ASL        
0x03DE45|$0F:$DE35:0A      	ASL        
0x03DE46|$0F:$DE36:0A      	ASL        
0x03DE47|$0F:$DE37:65 0C   	ADC $0C    
0x03DE49|$0F:$DE39:85 07   	STA $07    
0x03DE4B|$0F:$DE3B:A9 04   	LDA #$04   
0x03DE4D|$0F:$DE3D:85 08   	STA $08    
0x03DE4F|$0F:$DE3F:60      	RTS        

; control flow target (from $DE68, $DEA0)
0x03DE50|$0F:$DE40:06 0C   	ASL $0C    
0x03DE52|$0F:$DE42:06 0E   	ASL $0E    
; control flow target (from $DE6E, $DEA6)
0x03DE54|$0F:$DE44:A5 0E   	LDA $0E    
0x03DE56|$0F:$DE46:29 FC   	AND #$FC   
0x03DE58|$0F:$DE48:0A      	ASL        
0x03DE59|$0F:$DE49:85 07   	STA $07    
0x03DE5B|$0F:$DE4B:A5 0C   	LDA $0C    
0x03DE5D|$0F:$DE4D:29 1F   	AND #$1F   
0x03DE5F|$0F:$DE4F:4A      	LSR        
0x03DE60|$0F:$DE50:4A      	LSR        
0x03DE61|$0F:$DE51:18      	CLC        
0x03DE62|$0F:$DE52:65 07   	ADC $07    
0x03DE64|$0F:$DE54:18      	CLC        
0x03DE65|$0F:$DE55:69 C0   	ADC #$C0   
0x03DE67|$0F:$DE57:85 07   	STA $07    
0x03DE69|$0F:$DE59:A5 0C   	LDA $0C    
0x03DE6B|$0F:$DE5B:29 20   	AND #$20   
0x03DE6D|$0F:$DE5D:D0 04   	BNE $DE63  
0x03DE6F|$0F:$DE5F:A9 03   	LDA #$03   
0x03DE71|$0F:$DE61:D0 02   	BNE $DE65  
; control flow target (from $DE5D)
0x03DE73|$0F:$DE63:A9 07   	LDA #$07   
; control flow target (from $DE61)
0x03DE75|$0F:$DE65:85 08   	STA $08    
0x03DE77|$0F:$DE67:60      	RTS        

0x03DE78|$0F:$DE68:20 40 DE	JSR $DE40  
0x03DE7B|$0F:$DE6B:4C 71 DE	JMP $DE71  

; control flow target (from $DF2F, $EADF)
; external control flow target (from $04:$8D88)
0x03DE7E|$0F:$DE6E:20 44 DE	JSR $DE44  
; control flow target (from $DE6B)
0x03DE81|$0F:$DE71:98      	TYA        
0x03DE82|$0F:$DE72:48      	PHA        
0x03DE83|$0F:$DE73:A5 0E   	LDA $0E    
0x03DE85|$0F:$DE75:29 02   	AND #$02   
0x03DE87|$0F:$DE77:0A      	ASL        
0x03DE88|$0F:$DE78:85 0D   	STA $0D    
0x03DE8A|$0F:$DE7A:A5 0C   	LDA $0C    
0x03DE8C|$0F:$DE7C:29 02   	AND #$02   
0x03DE8E|$0F:$DE7E:18      	CLC        
0x03DE8F|$0F:$DE7F:65 0D   	ADC $0D    
0x03DE91|$0F:$DE81:A8      	TAY        
0x03DE92|$0F:$DE82:A9 FC   	LDA #$FC   
0x03DE94|$0F:$DE84:C0 00   	CPY #$00   
0x03DE96|$0F:$DE86:F0 07   	BEQ $DE8F  
; control flow target (from $DE8D)
0x03DE98|$0F:$DE88:38      	SEC        
0x03DE99|$0F:$DE89:2A      	ROL        
0x03DE9A|$0F:$DE8A:06 09   	ASL $09    
0x03DE9C|$0F:$DE8C:88      	DEY        
0x03DE9D|$0F:$DE8D:D0 F9   	BNE $DE88  
; control flow target (from $DE86)
0x03DE9F|$0F:$DE8F:31 07   	AND ($07),Y
0x03DEA1|$0F:$DE91:05 09   	ORA $09    
0x03DEA3|$0F:$DE93:91 07   	STA ($07),Y
0x03DEA5|$0F:$DE95:85 09   	STA $09    
0x03DEA7|$0F:$DE97:68      	PLA        
0x03DEA8|$0F:$DE98:A8      	TAY        
0x03DEA9|$0F:$DE99:60      	RTS        

; control flow target (from $E71C, $E81A)
0x03DEAA|$0F:$DE9A:20 62 DF	JSR $DF62  
0x03DEAD|$0F:$DE9D:4C A6 DE	JMP $DEA6  

0x03DEB0|$0F:$DEA0:20 40 DE	JSR $DE40  
0x03DEB3|$0F:$DEA3:4C A9 DE	JMP $DEA9  

; control flow target (from $DE9D)
0x03DEB6|$0F:$DEA6:20 44 DE	JSR $DE44  
; control flow target (from $DEA3)
0x03DEB9|$0F:$DEA9:98      	TYA        
0x03DEBA|$0F:$DEAA:48      	PHA        
0x03DEBB|$0F:$DEAB:A0 00   	LDY #$00   
0x03DEBD|$0F:$DEAD:B1 07   	LDA ($07),Y
0x03DEBF|$0F:$DEAF:85 09   	STA $09    
0x03DEC1|$0F:$DEB1:68      	PLA        
0x03DEC2|$0F:$DEB2:A8      	TAY        
0x03DEC3|$0F:$DEB3:A5 08   	LDA $08    
0x03DEC5|$0F:$DEB5:18      	CLC        
0x03DEC6|$0F:$DEB6:69 20   	ADC #$20   
0x03DEC8|$0F:$DEB8:85 08   	STA $08    
0x03DECA|$0F:$DEBA:4C FA C1	JMP $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00


; code -> data
; indexed data load target (from $DF54, $DF5A, $E951, $E957)
0x03DECD|$0F:$DEBD:CB 83	; $02:$83CB
0x03DECF|$0F:$DEBF:6B 84	; $02:$846B
0x03DED1|$0F:$DEC1:33 85	; $02:$8533
; indirect data load target
0x03DED3|$0F:$DEC3:FB 85	; $02:$85FB

; data -> code
; control flow target (from $CAE1, $D092, $D0DF, $D256, $D325, $E2C5, $E2D7, $E5F5, $E669, $E6F5, $E74C, $E7F3, $E84A)
0x03DED5|$0F:$DEC5:20 FC EA	JSR $EAFC  
0x03DED8|$0F:$DEC8:90 01   	BCC $DECB  
0x03DEDA|$0F:$DECA:60      	RTS        

; control flow target (from $DEC8)
0x03DEDB|$0F:$DECB:20 4A DF	JSR $DF4A  
0x03DEDE|$0F:$DECE:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03DEE1|$0F:$DED1:A0 00   	LDY #$00   
0x03DEE3|$0F:$DED3:B1 10   	LDA ($10),Y
0x03DEE5|$0F:$DED5:85 09   	STA $09    
0x03DEE7|$0F:$DED7:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03DEEA|$0F:$DEDA:A5 1C   	LDA $1C    
0x03DEEC|$0F:$DEDC:4A      	LSR        
0x03DEED|$0F:$DEDD:90 03   	BCC $DEE2  
0x03DEEF|$0F:$DEDF:20 41 DF	JSR $DF41  
; control flow target (from $DEDD)
0x03DEF2|$0F:$DEE2:C8      	INY        
0x03DEF3|$0F:$DEE3:B1 10   	LDA ($10),Y
0x03DEF5|$0F:$DEE5:85 09   	STA $09    
0x03DEF7|$0F:$DEE7:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03DEFA|$0F:$DEEA:A5 1C   	LDA $1C    
0x03DEFC|$0F:$DEEC:29 02   	AND #$02   
0x03DEFE|$0F:$DEEE:F0 03   	BEQ $DEF3  
0x03DF00|$0F:$DEF0:20 41 DF	JSR $DF41  
; control flow target (from $DEEE)
0x03DF03|$0F:$DEF3:C8      	INY        
0x03DF04|$0F:$DEF4:A5 07   	LDA $07    
0x03DF06|$0F:$DEF6:18      	CLC        
0x03DF07|$0F:$DEF7:69 1E   	ADC #$1E   
0x03DF09|$0F:$DEF9:85 07   	STA $07    
0x03DF0B|$0F:$DEFB:90 02   	BCC $DEFF  
0x03DF0D|$0F:$DEFD:E6 08   	INC $08    
; control flow target (from $DEFB)
0x03DF0F|$0F:$DEFF:B1 10   	LDA ($10),Y
0x03DF11|$0F:$DF01:85 09   	STA $09    
0x03DF13|$0F:$DF03:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03DF16|$0F:$DF06:A5 1C   	LDA $1C    
0x03DF18|$0F:$DF08:29 04   	AND #$04   
0x03DF1A|$0F:$DF0A:F0 03   	BEQ $DF0F  
0x03DF1C|$0F:$DF0C:20 41 DF	JSR $DF41  
; control flow target (from $DF0A)
0x03DF1F|$0F:$DF0F:C8      	INY        
0x03DF20|$0F:$DF10:B1 10   	LDA ($10),Y
0x03DF22|$0F:$DF12:85 09   	STA $09    
0x03DF24|$0F:$DF14:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03DF27|$0F:$DF17:A5 1C   	LDA $1C    
0x03DF29|$0F:$DF19:29 08   	AND #$08   
0x03DF2B|$0F:$DF1B:F0 03   	BEQ $DF20  
0x03DF2D|$0F:$DF1D:20 41 DF	JSR $DF41  
; control flow target (from $DF1B)
0x03DF30|$0F:$DF20:C8      	INY        
0x03DF31|$0F:$DF21:B1 10   	LDA ($10),Y
0x03DF33|$0F:$DF23:29 03   	AND #$03   
0x03DF35|$0F:$DF25:85 09   	STA $09    
0x03DF37|$0F:$DF27:A5 1A   	LDA $1A    
0x03DF39|$0F:$DF29:85 0C   	STA $0C    
0x03DF3B|$0F:$DF2B:A5 1B   	LDA $1B    
0x03DF3D|$0F:$DF2D:85 0E   	STA $0E    
0x03DF3F|$0F:$DF2F:20 6E DE	JSR $DE6E  
0x03DF42|$0F:$DF32:A5 1E   	LDA $1E    
0x03DF44|$0F:$DF34:D0 0A   	BNE $DF40  
0x03DF46|$0F:$DF36:A5 08   	LDA $08    
0x03DF48|$0F:$DF38:18      	CLC        
0x03DF49|$0F:$DF39:69 20   	ADC #$20   
0x03DF4B|$0F:$DF3B:85 08   	STA $08    
0x03DF4D|$0F:$DF3D:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
; control flow target (from $DF34)
0x03DF50|$0F:$DF40:60      	RTS        

; control flow target (from $DEDF, $DEF0, $DF0C, $DF1D)
0x03DF51|$0F:$DF41:C6 02   	DEC $02    
0x03DF53|$0F:$DF43:C6 02   	DEC $02    
0x03DF55|$0F:$DF45:C6 02   	DEC $02    
0x03DF57|$0F:$DF47:C6 01   	DEC $01    
0x03DF59|$0F:$DF49:60      	RTS        

; control flow target (from $D366, $DAA9, $DECB, $E3E5)
0x03DF5A|$0F:$DF4A:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03DF5C|$0F:$DF4C:0A      	ASL        
0x03DF5D|$0F:$DF4D:A8      	TAY        
0x03DF5E|$0F:$DF4E:A5 0C   	LDA $0C    
0x03DF60|$0F:$DF50:0A      	ASL        
0x03DF61|$0F:$DF51:0A      	ASL        
0x03DF62|$0F:$DF52:65 0C   	ADC $0C    
0x03DF64|$0F:$DF54:79 BD DE	ADC $DEBD,Y
0x03DF67|$0F:$DF57:85 10   	STA $10    
0x03DF69|$0F:$DF59:C8      	INY        
0x03DF6A|$0F:$DF5A:B9 BD DE	LDA $DEBD,Y
0x03DF6D|$0F:$DF5D:69 00   	ADC #$00   
0x03DF6F|$0F:$DF5F:85 11   	STA $11    
0x03DF71|$0F:$DF61:60      	RTS        

; control flow target (from $DE9A, $EAFC)
; external control flow target (from $02:$B116)
0x03DF72|$0F:$DF62:A5 15   	LDA $15    
0x03DF74|$0F:$DF64:0A      	ASL        
0x03DF75|$0F:$DF65:18      	CLC        
0x03DF76|$0F:$DF66:65 19   	ADC $19    
0x03DF78|$0F:$DF68:18      	CLC        
0x03DF79|$0F:$DF69:69 1E   	ADC #$1E   
0x03DF7B|$0F:$DF6B:85 0C   	STA $0C    
0x03DF7D|$0F:$DF6D:A9 1E   	LDA #$1E   
0x03DF7F|$0F:$DF6F:85 0E   	STA $0E    
0x03DF81|$0F:$DF71:20 93 C3	JSR $C393  
0x03DF84|$0F:$DF74:85 0E   	STA $0E    
0x03DF86|$0F:$DF76:A5 14   	LDA $14    
0x03DF88|$0F:$DF78:0A      	ASL        
0x03DF89|$0F:$DF79:18      	CLC        
0x03DF8A|$0F:$DF7A:65 18   	ADC $18    
0x03DF8C|$0F:$DF7C:29 3F   	AND #$3F   
0x03DF8E|$0F:$DF7E:85 0C   	STA $0C    
0x03DF90|$0F:$DF80:60      	RTS        


; code -> data
; data load target (from $E0CB)
0x03DF91|$0F:$DF81:95
; data load target (from $E0D2)
0x03DF92|$0F:$DF82:   9D	; $03:$9D95

; data -> code
; external control flow target (from $02:$B266)
0x03DF93|$0F:$DF83:20 89 DF	JSR $DF89  
0x03DF96|$0F:$DF86:4C 70 F7	JMP $F770  	; load ROM bank #$02

; control flow target (from $CFA8, $D0A3, $D363, $D680, $DA9E, $DF83, $E3E2, $EB20, $F95D)
0x03DF99|$0F:$DF89:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03DF9B|$0F:$DF8B:C9 02   	CMP #$02   
0x03DF9D|$0F:$DF8D:90 18   	BCC $DFA7  
0x03DF9F|$0F:$DF8F:A5 0E   	LDA $0E    
0x03DFA1|$0F:$DF91:48      	PHA        
0x03DFA2|$0F:$DF92:A5 0C   	LDA $0C    
0x03DFA4|$0F:$DF94:48      	PHA        
0x03DFA5|$0F:$DF95:46 0C   	LSR $0C    
0x03DFA7|$0F:$DF97:46 0E   	LSR $0E    
0x03DFA9|$0F:$DF99:20 A7 DF	JSR $DFA7  
0x03DFAC|$0F:$DF9C:68      	PLA        
0x03DFAD|$0F:$DF9D:4A      	LSR        
0x03DFAE|$0F:$DF9E:68      	PLA        
0x03DFAF|$0F:$DF9F:2A      	ROL        
0x03DFB0|$0F:$DFA0:29 03   	AND #$03   
0x03DFB2|$0F:$DFA2:05 0C   	ORA $0C    
0x03DFB4|$0F:$DFA4:85 0C   	STA $0C    
0x03DFB6|$0F:$DFA6:60      	RTS        

; control flow target (from $DF8D, $DF99)
0x03DFB7|$0F:$DFA7:A5 0C   	LDA $0C    
0x03DFB9|$0F:$DFA9:85 12   	STA $12    
0x03DFBB|$0F:$DFAB:A5 0E   	LDA $0E    
0x03DFBD|$0F:$DFAD:85 13   	STA $13    
0x03DFBF|$0F:$DFAF:A5 21   	LDA $21    	; map width
0x03DFC1|$0F:$DFB1:C5 0C   	CMP $0C    
0x03DFC3|$0F:$DFB3:B0 05   	BCS $DFBA  
; control flow target (from $DFBE)
0x03DFC5|$0F:$DFB5:A5 20   	LDA $20    	; map exterior border tile ID (#$00 = Road, #$01 = Grass, #$02 = Sand, #$03 = Tree, #$04 = Water, #$05 = Vertical Wall, #$06 = Shrub, #$07 = Horizontal Wall, #$08 = Swamp, ..., #$20 = Ceiling Alternating?, #$21 = Ceiling Down?, #$24 = Black?, #$28 = Blue?)
0x03DFC7|$0F:$DFB7:85 0C   	STA $0C    
0x03DFC9|$0F:$DFB9:60      	RTS        

; control flow target (from $DFB3)
0x03DFCA|$0F:$DFBA:A5 22   	LDA $22    	; map height
0x03DFCC|$0F:$DFBC:C5 0E   	CMP $0E    
0x03DFCE|$0F:$DFBE:90 F5   	BCC $DFB5  
0x03DFD0|$0F:$DFC0:98      	TYA        
0x03DFD1|$0F:$DFC1:48      	PHA        
0x03DFD2|$0F:$DFC2:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03DFD4|$0F:$DFC4:F0 03   	BEQ $DFC9  
0x03DFD6|$0F:$DFC6:4C 69 E1	JMP $E169  

; control flow target (from $DFC4)
0x03DFD9|$0F:$DFC9:20 75 F7	JSR $F775  	; load ROM bank #$03
0x03DFDC|$0F:$DFCC:A5 D0   	LDA $D0    	; Malroth status flag (#$FF = defeated, #$00 = alive, others = countdown to battle)
0x03DFDE|$0F:$DFCE:F0 19   	BEQ $DFE9  
0x03DFE0|$0F:$DFD0:A5 12   	LDA $12    
0x03DFE2|$0F:$DFD2:C9 5E   	CMP #$5E   
0x03DFE4|$0F:$DFD4:90 13   	BCC $DFE9  
0x03DFE6|$0F:$DFD6:C9 60   	CMP #$60   
0x03DFE8|$0F:$DFD8:B0 0F   	BCS $DFE9  
0x03DFEA|$0F:$DFDA:A5 13   	LDA $13    
0x03DFEC|$0F:$DFDC:C9 A4   	CMP #$A4   
0x03DFEE|$0F:$DFDE:90 09   	BCC $DFE9  
0x03DFF0|$0F:$DFE0:C9 A6   	CMP #$A6   
0x03DFF2|$0F:$DFE2:B0 05   	BCS $DFE9  
0x03DFF4|$0F:$DFE4:A9 02   	LDA #$02   
0x03DFF6|$0F:$DFE6:4C 87 E0	JMP $E087  

; control flow target (from $DFCE, $DFD4, $DFD8, $DFDE, $DFE2)
0x03DFF9|$0F:$DFE9:A5 CE   	LDA $CE    	; Tuhn Watergate open flag (#$00 = closed, #$01 = open)
0x03DFFB|$0F:$DFEB:F0 13   	BEQ $E000  
0x03DFFD|$0F:$DFED:A5 12   	LDA $12    
0x03DFFF|$0F:$DFEF:C9 44   	CMP #$44   
0x03E001|$0F:$DFF1:D0 0D   	BNE $E000  
0x03E003|$0F:$DFF3:A5 13   	LDA $13    
0x03E005|$0F:$DFF5:C9 86   	CMP #$86   
0x03E007|$0F:$DFF7:90 07   	BCC $E000  
0x03E009|$0F:$DFF9:C9 89   	CMP #$89   
0x03E00B|$0F:$DFFB:B0 03   	BCS $E000  
0x03E00D|$0F:$DFFD:4C 85 E0	JMP $E085  

; control flow target (from $DFEB, $DFF1, $DFF7, $DFFB)
0x03E010|$0F:$E000:AD F9 05	LDA $05F9  	; flag for Cave to Rhone open
0x03E013|$0F:$E003:D0 10   	BNE $E015  
0x03E015|$0F:$E005:A5 12   	LDA $12    
0x03E017|$0F:$E007:C9 73   	CMP #$73   
0x03E019|$0F:$E009:D0 0A   	BNE $E015  
0x03E01B|$0F:$E00B:A5 13   	LDA $13    
0x03E01D|$0F:$E00D:C9 C5   	CMP #$C5   
0x03E01F|$0F:$E00F:D0 04   	BNE $E015  
0x03E021|$0F:$E011:A9 05   	LDA #$05   
0x03E023|$0F:$E013:D0 72   	BNE $E087  
; control flow target (from $E003, $E009, $E00F)
0x03E025|$0F:$E015:20 C0 E0	JSR $E0C0  
0x03E028|$0F:$E018:C9 04   	CMP #$04   
0x03E02A|$0F:$E01A:F0 03   	BEQ $E01F  
0x03E02C|$0F:$E01C:68      	PLA        
0x03E02D|$0F:$E01D:A8      	TAY        
0x03E02E|$0F:$E01E:60      	RTS        

; control flow target (from $E01A)
0x03E02F|$0F:$E01F:A0 00   	LDY #$00   
0x03E031|$0F:$E021:84 D4   	STY $D4    
0x03E033|$0F:$E023:8C F4 05	STY $05F4  
; control flow target (from $E057)
0x03E036|$0F:$E026:B9 B4 E0	LDA $E0B4,Y
0x03E039|$0F:$E029:18      	CLC        
0x03E03A|$0F:$E02A:65 12   	ADC $12    
0x03E03C|$0F:$E02C:85 0C   	STA $0C    
0x03E03E|$0F:$E02E:B9 B8 E0	LDA $E0B8,Y
0x03E041|$0F:$E031:18      	CLC        
0x03E042|$0F:$E032:65 13   	ADC $13    
0x03E044|$0F:$E034:85 0E   	STA $0E    
0x03E046|$0F:$E036:20 C0 E0	JSR $E0C0  
0x03E049|$0F:$E039:C9 04   	CMP #$04   
0x03E04B|$0F:$E03B:F0 12   	BEQ $E04F  
0x03E04D|$0F:$E03D:C9 09   	CMP #$09   
0x03E04F|$0F:$E03F:F0 0E   	BEQ $E04F  
0x03E051|$0F:$E041:C9 0D   	CMP #$0D   
0x03E053|$0F:$E043:F0 0A   	BEQ $E04F  
0x03E055|$0F:$E045:AC F4 05	LDY $05F4  
0x03E058|$0F:$E048:B9 BC E0	LDA $E0BC,Y
0x03E05B|$0F:$E04B:05 D4   	ORA $D4    
0x03E05D|$0F:$E04D:85 D4   	STA $D4    
; control flow target (from $E03B, $E03F, $E043)
0x03E05F|$0F:$E04F:EE F4 05	INC $05F4  
0x03E062|$0F:$E052:AC F4 05	LDY $05F4  
0x03E065|$0F:$E055:C0 04   	CPY #$04   
0x03E067|$0F:$E057:D0 CD   	BNE $E026  
0x03E069|$0F:$E059:A4 D4   	LDY $D4    
0x03E06B|$0F:$E05B:B9 8C E0	LDA $E08C,Y
0x03E06E|$0F:$E05E:85 D4   	STA $D4    
0x03E070|$0F:$E060:30 23   	BMI $E085  
0x03E072|$0F:$E062:C9 15   	CMP #$15   
0x03E074|$0F:$E064:B0 21   	BCS $E087  
0x03E076|$0F:$E066:A8      	TAY        
0x03E077|$0F:$E067:B9 9C E0	LDA $E09C,Y
0x03E07A|$0F:$E06A:18      	CLC        
0x03E07B|$0F:$E06B:65 12   	ADC $12    
0x03E07D|$0F:$E06D:85 0C   	STA $0C    
0x03E07F|$0F:$E06F:B9 A4 E0	LDA $E0A4,Y
0x03E082|$0F:$E072:18      	CLC        
0x03E083|$0F:$E073:65 13   	ADC $13    
0x03E085|$0F:$E075:85 0E   	STA $0E    
0x03E087|$0F:$E077:20 C0 E0	JSR $E0C0  
0x03E08A|$0F:$E07A:C9 04   	CMP #$04   
0x03E08C|$0F:$E07C:D0 07   	BNE $E085  
0x03E08E|$0F:$E07E:A4 D4   	LDY $D4    
0x03E090|$0F:$E080:B9 AC E0	LDA $E0AC,Y
0x03E093|$0F:$E083:D0 02   	BNE $E087  
; control flow target (from $DFFD, $E060, $E07C, $E191)
0x03E095|$0F:$E085:A9 04   	LDA #$04   
; control flow target (from $DFE6, $E013, $E064, $E083, $E174)
0x03E097|$0F:$E087:85 0C   	STA $0C    
0x03E099|$0F:$E089:68      	PLA        
0x03E09A|$0F:$E08A:A8      	TAY        
0x03E09B|$0F:$E08B:60      	RTS        


; code -> data
; indexed data load target (from $E05B)
0x03E09C|$0F:$E08C:FF
0x03E09D|$0F:$E08D:04
0x03E09E|$0F:$E08E:05
0x03E09F|$0F:$E08F:00
0x03E0A0|$0F:$E090:06
0x03E0A1|$0F:$E091:FF
0x03E0A2|$0F:$E092:01
0x03E0A3|$0F:$E093:FF
0x03E0A4|$0F:$E094:07
0x03E0A5|$0F:$E095:02
0x03E0A6|$0F:$E096:FF
; indirect data load target
0x03E0A7|$0F:$E097:FF
0x03E0A8|$0F:$E098:03
0x03E0A9|$0F:$E099:FF
0x03E0AA|$0F:$E09A:FF
; indirect data load target
0x03E0AB|$0F:$E09B:FF
; indexed data load target (from $E067)
0x03E0AC|$0F:$E09C:FF
0x03E0AD|$0F:$E09D:FF
0x03E0AE|$0F:$E09E:01
0x03E0AF|$0F:$E09F:01
0x03E0B0|$0F:$E0A0:01
0x03E0B1|$0F:$E0A1:FF
0x03E0B2|$0F:$E0A2:FF
0x03E0B3|$0F:$E0A3:01
; indexed data load target (from $E06F)
0x03E0B4|$0F:$E0A4:01
0x03E0B5|$0F:$E0A5:FF
0x03E0B6|$0F:$E0A6:01
0x03E0B7|$0F:$E0A7:FF
0x03E0B8|$0F:$E0A8:01
0x03E0B9|$0F:$E0A9:01
0x03E0BA|$0F:$E0AA:FF
0x03E0BB|$0F:$E0AB:FF
; indexed data load target (from $E080)
0x03E0BC|$0F:$E0AC:16
0x03E0BD|$0F:$E0AD:1B
0x03E0BE|$0F:$E0AE:14
0x03E0BF|$0F:$E0AF:19
0x03E0C0|$0F:$E0B0:15
0x03E0C1|$0F:$E0B1:18
0x03E0C2|$0F:$E0B2:1A
0x03E0C3|$0F:$E0B3:17
; indexed data load target (from $E026)
0x03E0C4|$0F:$E0B4:00
0x03E0C5|$0F:$E0B5:01
0x03E0C6|$0F:$E0B6:00
0x03E0C7|$0F:$E0B7:FF
; indexed data load target (from $E02E)
0x03E0C8|$0F:$E0B8:FF
0x03E0C9|$0F:$E0B9:00
0x03E0CA|$0F:$E0BA:01
0x03E0CB|$0F:$E0BB:00
; indexed data load target (from $E048)
0x03E0CC|$0F:$E0BC:01
0x03E0CD|$0F:$E0BD:02
0x03E0CE|$0F:$E0BE:04
0x03E0CF|$0F:$E0BF:08

; data -> code
; control flow target (from $E015, $E036, $E077)
; indirect data load target
; WARNING! $E0C0 was also seen as data
0x03E0D0|$0F:$E0C0:A9   
; WARNING! $E0C1 was also seen as data
0x03E0D1|$0F:$E0C1:   00   	LDA #$00   
0x03E0D2|$0F:$E0C2:85 0F   	STA $0F    
0x03E0D4|$0F:$E0C4:06 0E   	ASL $0E    
0x03E0D6|$0F:$E0C6:26 0F   	ROL $0F    
0x03E0D8|$0F:$E0C8:A5 0E   	LDA $0E    
0x03E0DA|$0F:$E0CA:18      	CLC        
0x03E0DB|$0F:$E0CB:6D 81 DF	ADC $DF81  
0x03E0DE|$0F:$E0CE:85 0E   	STA $0E    
0x03E0E0|$0F:$E0D0:A5 0F   	LDA $0F    
0x03E0E2|$0F:$E0D2:6D 82 DF	ADC $DF82  
0x03E0E5|$0F:$E0D5:85 0F   	STA $0F    
0x03E0E7|$0F:$E0D7:A0 00   	LDY #$00   
0x03E0E9|$0F:$E0D9:B1 0E   	LDA ($0E),Y
0x03E0EB|$0F:$E0DB:85 10   	STA $10    
0x03E0ED|$0F:$E0DD:C8      	INY        
0x03E0EE|$0F:$E0DE:B1 0E   	LDA ($0E),Y
0x03E0F0|$0F:$E0E0:85 11   	STA $11    
0x03E0F2|$0F:$E0E2:A5 0C   	LDA $0C    
0x03E0F4|$0F:$E0E4:C9 80   	CMP #$80   
0x03E0F6|$0F:$E0E6:90 2A   	BCC $E112  
0x03E0F8|$0F:$E0E8:49 FF   	EOR #$FF   
0x03E0FA|$0F:$E0EA:85 0C   	STA $0C    
0x03E0FC|$0F:$E0EC:C8      	INY        
0x03E0FD|$0F:$E0ED:B1 0E   	LDA ($0E),Y
0x03E0FF|$0F:$E0EF:18      	CLC        
0x03E100|$0F:$E0F0:E5 10   	SBC $10    
0x03E102|$0F:$E0F2:A8      	TAY        
0x03E103|$0F:$E0F3:A9 00   	LDA #$00   
0x03E105|$0F:$E0F5:85 0D   	STA $0D    
; control flow target (from $E10F)
0x03E107|$0F:$E0F7:B1 10   	LDA ($10),Y
0x03E109|$0F:$E0F9:E6 0D   	INC $0D    
0x03E10B|$0F:$E0FB:29 E0   	AND #$E0   
0x03E10D|$0F:$E0FD:F0 09   	BEQ $E108  
0x03E10F|$0F:$E0FF:B1 10   	LDA ($10),Y
0x03E111|$0F:$E101:29 1F   	AND #$1F   
0x03E113|$0F:$E103:18      	CLC        
0x03E114|$0F:$E104:65 0D   	ADC $0D    
0x03E116|$0F:$E106:85 0D   	STA $0D    
; control flow target (from $E0FD)
0x03E118|$0F:$E108:A5 0C   	LDA $0C    
0x03E11A|$0F:$E10A:C5 0D   	CMP $0D    
0x03E11C|$0F:$E10C:90 22   	BCC $E130  
0x03E11E|$0F:$E10E:88      	DEY        
0x03E11F|$0F:$E10F:4C F7 E0	JMP $E0F7  

; control flow target (from $E0E6)
0x03E122|$0F:$E112:88      	DEY        
0x03E123|$0F:$E113:84 0D   	STY $0D    
; control flow target (from $E12D)
0x03E125|$0F:$E115:B1 10   	LDA ($10),Y
0x03E127|$0F:$E117:E6 0D   	INC $0D    
0x03E129|$0F:$E119:29 E0   	AND #$E0   
0x03E12B|$0F:$E11B:F0 09   	BEQ $E126  
0x03E12D|$0F:$E11D:B1 10   	LDA ($10),Y
0x03E12F|$0F:$E11F:29 1F   	AND #$1F   
0x03E131|$0F:$E121:18      	CLC        
0x03E132|$0F:$E122:65 0D   	ADC $0D    
0x03E134|$0F:$E124:85 0D   	STA $0D    
; control flow target (from $E11B)
0x03E136|$0F:$E126:A5 0C   	LDA $0C    
0x03E138|$0F:$E128:C5 0D   	CMP $0D    
0x03E13A|$0F:$E12A:90 04   	BCC $E130  
0x03E13C|$0F:$E12C:C8      	INY        
0x03E13D|$0F:$E12D:4C 15 E1	JMP $E115  

; control flow target (from $E10C, $E12A)
0x03E140|$0F:$E130:B1 10   	LDA ($10),Y
0x03E142|$0F:$E132:29 E0   	AND #$E0   
0x03E144|$0F:$E134:D0 2C   	BNE $E162  
0x03E146|$0F:$E136:B1 10   	LDA ($10),Y
0x03E148|$0F:$E138:29 1F   	AND #$1F   
; control flow target (from $E167)
0x03E14A|$0F:$E13A:85 0C   	STA $0C    
0x03E14C|$0F:$E13C:AD F8 05	LDA $05F8  	; Sea Cave shoal status (#$00 = shoals up, others = shoals down)
0x03E14F|$0F:$E13F:F0 1E   	BEQ $E15F  
0x03E151|$0F:$E141:A5 12   	LDA $12    
0x03E153|$0F:$E143:C9 B2   	CMP #$B2   
0x03E155|$0F:$E145:90 18   	BCC $E15F  
0x03E157|$0F:$E147:C9 B9   	CMP #$B9   
0x03E159|$0F:$E149:B0 14   	BCS $E15F  
0x03E15B|$0F:$E14B:A5 13   	LDA $13    
0x03E15D|$0F:$E14D:C9 A3   	CMP #$A3   
0x03E15F|$0F:$E14F:90 0E   	BCC $E15F  
0x03E161|$0F:$E151:C9 AC   	CMP #$AC   
0x03E163|$0F:$E153:B0 0A   	BCS $E15F  
0x03E165|$0F:$E155:A5 0C   	LDA $0C    
0x03E167|$0F:$E157:C9 13   	CMP #$13   
0x03E169|$0F:$E159:90 04   	BCC $E15F  
0x03E16B|$0F:$E15B:A9 04   	LDA #$04   
0x03E16D|$0F:$E15D:85 0C   	STA $0C    
; control flow target (from $E13F, $E145, $E149, $E14F, $E153, $E159)
0x03E16F|$0F:$E15F:A5 0C   	LDA $0C    
0x03E171|$0F:$E161:60      	RTS        

; control flow target (from $E134)
0x03E172|$0F:$E162:4A      	LSR        
0x03E173|$0F:$E163:4A      	LSR        
0x03E174|$0F:$E164:4A      	LSR        
0x03E175|$0F:$E165:4A      	LSR        
0x03E176|$0F:$E166:4A      	LSR        
0x03E177|$0F:$E167:90 D1   	BCC $E13A  
; control flow target (from $DFC6)
0x03E179|$0F:$E169:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03E17C|$0F:$E16C:A5 D0   	LDA $D0    	; Malroth status flag (#$FF = defeated, #$00 = alive, others = countdown to battle)
0x03E17E|$0F:$E16E:30 07   	BMI $E177  
0x03E180|$0F:$E170:F0 05   	BEQ $E177  
0x03E182|$0F:$E172:A9 17   	LDA #$17   
0x03E184|$0F:$E174:4C 87 E0	JMP $E087  

; control flow target (from $E16E, $E170)
0x03E187|$0F:$E177:A5 31   	LDA $31    	; current map ID
0x03E189|$0F:$E179:C9 12   	CMP #$12   	; Map ID #$12: Tuhn Watergate
0x03E18B|$0F:$E17B:D0 17   	BNE $E194  
0x03E18D|$0F:$E17D:A5 CE   	LDA $CE    	; Tuhn Watergate open flag (#$00 = closed, #$01 = open)
0x03E18F|$0F:$E17F:F0 13   	BEQ $E194  
0x03E191|$0F:$E181:A5 13   	LDA $13    
0x03E193|$0F:$E183:C9 05   	CMP #$05   
0x03E195|$0F:$E185:D0 0D   	BNE $E194  
0x03E197|$0F:$E187:A5 12   	LDA $12    
0x03E199|$0F:$E189:C9 02   	CMP #$02   
0x03E19B|$0F:$E18B:F0 04   	BEQ $E191  
0x03E19D|$0F:$E18D:C9 03   	CMP #$03   
0x03E19F|$0F:$E18F:D0 03   	BNE $E194  
; control flow target (from $E18B)
0x03E1A1|$0F:$E191:4C 85 E0	JMP $E085  

; control flow target (from $E17B, $E17F, $E185, $E18F)
0x03E1A4|$0F:$E194:A9 00   	LDA #$00   
0x03E1A6|$0F:$E196:85 0D   	STA $0D    
0x03E1A8|$0F:$E198:85 0F   	STA $0F    
0x03E1AA|$0F:$E19A:A4 21   	LDY $21    	; map width
0x03E1AC|$0F:$E19C:C8      	INY        
0x03E1AD|$0F:$E19D:84 0C   	STY $0C    
0x03E1AF|$0F:$E19F:20 39 C3	JSR $C339  	; 16-bit multiplication: ($10-$11) = ($0C-$0D) * ($0E-$0F); consumes $0C-$0F
0x03E1B2|$0F:$E1A2:A5 12   	LDA $12    
0x03E1B4|$0F:$E1A4:18      	CLC        
0x03E1B5|$0F:$E1A5:65 10   	ADC $10    
0x03E1B7|$0F:$E1A7:85 10   	STA $10    
0x03E1B9|$0F:$E1A9:85 0E   	STA $0E    
0x03E1BB|$0F:$E1AB:A5 11   	LDA $11    
0x03E1BD|$0F:$E1AD:69 00   	ADC #$00   
0x03E1BF|$0F:$E1AF:85 0F   	STA $0F    
0x03E1C1|$0F:$E1B1:18      	CLC        
0x03E1C2|$0F:$E1B2:69 78   	ADC #$78   
0x03E1C4|$0F:$E1B4:85 11   	STA $11    
0x03E1C6|$0F:$E1B6:A0 00   	LDY #$00   
0x03E1C8|$0F:$E1B8:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E1CA|$0F:$E1BA:C9 02   	CMP #$02   
0x03E1CC|$0F:$E1BC:B0 07   	BCS $E1C5  
0x03E1CE|$0F:$E1BE:B1 10   	LDA ($10),Y
0x03E1D0|$0F:$E1C0:29 1F   	AND #$1F   
0x03E1D2|$0F:$E1C2:4C CB E1	JMP $E1CB  

; control flow target (from $E1BC)
0x03E1D5|$0F:$E1C5:B1 10   	LDA ($10),Y
0x03E1D7|$0F:$E1C7:29 1F   	AND #$1F   
0x03E1D9|$0F:$E1C9:0A      	ASL        
0x03E1DA|$0F:$E1CA:0A      	ASL        
; control flow target (from $E1C2)
0x03E1DB|$0F:$E1CB:85 0C   	STA $0C    
0x03E1DD|$0F:$E1CD:C9 14   	CMP #$14   
0x03E1DF|$0F:$E1CF:D0 1E   	BNE $E1EF  
0x03E1E1|$0F:$E1D1:A0 00   	LDY #$00   
; control flow target (from $E1ED)
0x03E1E3|$0F:$E1D3:A5 12   	LDA $12    
0x03E1E5|$0F:$E1D5:D9 1A 05	CMP $051A,Y	; something to do with whether you've opened the chest containing the Shield of Erdrick
0x03E1E8|$0F:$E1D8:D0 0F   	BNE $E1E9  
0x03E1EA|$0F:$E1DA:C8      	INY        
0x03E1EB|$0F:$E1DB:A5 13   	LDA $13    
0x03E1ED|$0F:$E1DD:D9 1A 05	CMP $051A,Y	; something to do with whether you've opened the chest containing the Shield of Erdrick
0x03E1F0|$0F:$E1E0:D0 08   	BNE $E1EA  
; control flow target (from $E20E)
0x03E1F2|$0F:$E1E2:A9 00   	LDA #$00   
0x03E1F4|$0F:$E1E4:85 0C   	STA $0C    
; control flow target (from $E1FB, $E216)
0x03E1F6|$0F:$E1E6:68      	PLA        
0x03E1F7|$0F:$E1E7:A8      	TAY        
0x03E1F8|$0F:$E1E8:60      	RTS        

; control flow target (from $E1D8)
0x03E1F9|$0F:$E1E9:C8      	INY        
; control flow target (from $E1E0)
0x03E1FA|$0F:$E1EA:C8      	INY        
0x03E1FB|$0F:$E1EB:C0 10   	CPY #$10   
0x03E1FD|$0F:$E1ED:D0 E4   	BNE $E1D3  
; control flow target (from $E1CF)
0x03E1FF|$0F:$E1EF:A5 0C   	LDA $0C    
0x03E201|$0F:$E1F1:C9 18   	CMP #$18   
0x03E203|$0F:$E1F3:F0 08   	BEQ $E1FD  
0x03E205|$0F:$E1F5:C9 19   	CMP #$19   
0x03E207|$0F:$E1F7:F0 04   	BEQ $E1FD  
0x03E209|$0F:$E1F9:C9 1A   	CMP #$1A   
0x03E20B|$0F:$E1FB:D0 E9   	BNE $E1E6  
; control flow target (from $E1F3, $E1F7)
0x03E20D|$0F:$E1FD:A0 00   	LDY #$00   
; control flow target (from $E214)
0x03E20F|$0F:$E1FF:A5 12   	LDA $12    
0x03E211|$0F:$E201:D9 2A 05	CMP $052A,Y
0x03E214|$0F:$E204:D0 0A   	BNE $E210  
0x03E216|$0F:$E206:C8      	INY        
0x03E217|$0F:$E207:A5 13   	LDA $13    
0x03E219|$0F:$E209:D9 2A 05	CMP $052A,Y
0x03E21C|$0F:$E20C:D0 03   	BNE $E211  
0x03E21E|$0F:$E20E:F0 D2   	BEQ $E1E2  
; control flow target (from $E204)
0x03E220|$0F:$E210:C8      	INY        
; control flow target (from $E20C)
0x03E221|$0F:$E211:C8      	INY        
0x03E222|$0F:$E212:C0 10   	CPY #$10   
0x03E224|$0F:$E214:D0 E9   	BNE $E1FF  
0x03E226|$0F:$E216:F0 CE   	BEQ $E1E6  
; control flow target (from $D9BD, $DB74, $E882, $E92D)
0x03E228|$0F:$E218:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E22A|$0F:$E21A:C9 02   	CMP #$02   
0x03E22C|$0F:$E21C:90 04   	BCC $E222  
0x03E22E|$0F:$E21E:46 12   	LSR $12    
0x03E230|$0F:$E220:46 13   	LSR $13    
; control flow target (from $DAA1, $E21C, $E3F3, $EB23, $F960)
0x03E232|$0F:$E222:A5 25   	LDA $25    	; map header byte 5
0x03E234|$0F:$E224:05 26   	ORA $26    	; map header byte 6, always #$00
0x03E236|$0F:$E226:D0 05   	BNE $E22D  
; control flow target (from $E231, $E237)
0x03E238|$0F:$E228:A9 00   	LDA #$00   
0x03E23A|$0F:$E22A:85 0D   	STA $0D    
0x03E23C|$0F:$E22C:60      	RTS        

; control flow target (from $E226)
0x03E23D|$0F:$E22D:A5 21   	LDA $21    	; map width
0x03E23F|$0F:$E22F:C5 12   	CMP $12    
0x03E241|$0F:$E231:90 F5   	BCC $E228  
0x03E243|$0F:$E233:A5 22   	LDA $22    	; map height
0x03E245|$0F:$E235:C5 13   	CMP $13    
0x03E247|$0F:$E237:90 EF   	BCC $E228  
0x03E249|$0F:$E239:98      	TYA        
0x03E24A|$0F:$E23A:48      	PHA        
0x03E24B|$0F:$E23B:8A      	TXA        
0x03E24C|$0F:$E23C:48      	PHA        
0x03E24D|$0F:$E23D:A6 21   	LDX $21    	; map width
0x03E24F|$0F:$E23F:E8      	INX        
0x03E250|$0F:$E240:86 74   	STX $74    
0x03E252|$0F:$E242:A9 00   	LDA #$00   
0x03E254|$0F:$E244:85 72   	STA $72    
0x03E256|$0F:$E246:A2 78   	LDX #$78   
0x03E258|$0F:$E248:A4 13   	LDY $13    
0x03E25A|$0F:$E24A:F0 0D   	BEQ $E259  
; control flow target (from $E257)
0x03E25C|$0F:$E24C:A5 72   	LDA $72    
0x03E25E|$0F:$E24E:18      	CLC        
0x03E25F|$0F:$E24F:65 74   	ADC $74    
0x03E261|$0F:$E251:85 72   	STA $72    
0x03E263|$0F:$E253:90 01   	BCC $E256  
0x03E265|$0F:$E255:E8      	INX        
; control flow target (from $E253)
0x03E266|$0F:$E256:88      	DEY        
0x03E267|$0F:$E257:D0 F3   	BNE $E24C  
; control flow target (from $E24A)
0x03E269|$0F:$E259:86 73   	STX $73    
0x03E26B|$0F:$E25B:A4 12   	LDY $12    
0x03E26D|$0F:$E25D:B1 72   	LDA ($72),Y
0x03E26F|$0F:$E25F:4A      	LSR        
0x03E270|$0F:$E260:4A      	LSR        
0x03E271|$0F:$E261:4A      	LSR        
0x03E272|$0F:$E262:4A      	LSR        
0x03E273|$0F:$E263:4A      	LSR        
0x03E274|$0F:$E264:85 0D   	STA $0D    
0x03E276|$0F:$E266:68      	PLA        
0x03E277|$0F:$E267:AA      	TAX        
0x03E278|$0F:$E268:68      	PLA        
0x03E279|$0F:$E269:A8      	TAY        
0x03E27A|$0F:$E26A:60      	RTS        


; code -> data
; indirect data load target (via $E278)
0x03E27B|$0F:$E26B:0F
; indirect data load target
0x03E27C|$0F:$E26C:36
; indirect data load target
0x03E27D|$0F:$E26D:30
; indirect data load target
0x03E27E|$0F:$E26E:11
; indirect data load target
0x03E27F|$0F:$E26F:36
; indirect data load target
0x03E280|$0F:$E270:19
; indirect data load target
0x03E281|$0F:$E271:16
; indirect data load target
0x03E282|$0F:$E272:36
; indirect data load target
0x03E283|$0F:$E273:30
; indirect data load target
0x03E284|$0F:$E274:13
; indirect data load target
0x03E285|$0F:$E275:01
; indirect data load target
0x03E286|$0F:$E276:01
; indirect data load target
0x03E287|$0F:$E277:01
; data load target (from $E30D)
0x03E288|$0F:$E278:6B
; data load target (from $E312)
0x03E289|$0F:$E279:   E2	; $0F:$E26B
; data load target (from $E302)
0x03E28A|$0F:$E27A:84
; data load target (from $E307)
0x03E28B|$0F:$E27B:   BC	; $03:$BC84
; data load target (from $E319)
0x03E28C|$0F:$E27C:91
; data load target (from $E321)
0x03E28D|$0F:$E27D:   BC	; $03:$BC91

; data -> code
0x03E28E|$0F:$E27E:20 2A C4	JSR $C42A  
; control flow target (from $D2B3)
0x03E291|$0F:$E281:20 65 C4	JSR $C465  	; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0
0x03E294|$0F:$E284:4C 90 E2	JMP $E290  

; control flow target (from $D866)
0x03E297|$0F:$E287:20 2A C4	JSR $C42A  
; control flow target (from $C7E9)
0x03E29A|$0F:$E28A:20 65 C4	JSR $C465  	; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0
0x03E29D|$0F:$E28D:20 FD E3	JSR $E3FD  
; control flow target (from $E284)
0x03E2A0|$0F:$E290:20 CC E3	JSR $E3CC  
0x03E2A3|$0F:$E293:A5 31   	LDA $31    	; current map ID
0x03E2A5|$0F:$E295:C9 01   	CMP #$01   	; Map ID #$01: World Map
0x03E2A7|$0F:$E297:D0 18   	BNE $E2B1  
0x03E2A9|$0F:$E299:A5 16   	LDA $16    	; current map X-pos (1)
0x03E2AB|$0F:$E29B:C9 54   	CMP #$54   	; Rhone region is from #$54 <= X-pos < #$90
0x03E2AD|$0F:$E29D:90 12   	BCC $E2B1  
0x03E2AF|$0F:$E29F:C9 90   	CMP #$90   
0x03E2B1|$0F:$E2A1:B0 0E   	BCS $E2B1  
0x03E2B3|$0F:$E2A3:A5 17   	LDA $17    	; current map Y-pos (1)
0x03E2B5|$0F:$E2A5:C9 91   	CMP #$91   	; Rhone region is from #$91 <= Y-pos < #$BA
0x03E2B7|$0F:$E2A7:90 08   	BCC $E2B1  
0x03E2B9|$0F:$E2A9:C9 BA   	CMP #$BA   
0x03E2BB|$0F:$E2AB:B0 04   	BCS $E2B1  
0x03E2BD|$0F:$E2AD:A9 68   	LDA #$68   	; palette for Rhone region of Wolrd Map
0x03E2BF|$0F:$E2AF:85 27   	STA $27    	; map palette; offset from ($E27C)
; control flow target (from $E297, $E29D, $E2A1, $E2A7, $E2AB)
0x03E2C1|$0F:$E2B1:20 DA E3	JSR $E3DA  
0x03E2C4|$0F:$E2B4:A9 F2   	LDA #$F2   
0x03E2C6|$0F:$E2B6:85 19   	STA $19    
; control flow target (from $E2EC)
0x03E2C8|$0F:$E2B8:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E2CB|$0F:$E2BB:A9 EE   	LDA #$EE   
0x03E2CD|$0F:$E2BD:85 18   	STA $18    
; control flow target (from $E2CC)
0x03E2CF|$0F:$E2BF:A9 00   	LDA #$00   
0x03E2D1|$0F:$E2C1:85 1C   	STA $1C    
0x03E2D3|$0F:$E2C3:85 1E   	STA $1E    
0x03E2D5|$0F:$E2C5:20 C5 DE	JSR $DEC5  
0x03E2D8|$0F:$E2C8:E6 18   	INC $18    
0x03E2DA|$0F:$E2CA:E6 18   	INC $18    
0x03E2DC|$0F:$E2CC:D0 F1   	BNE $E2BF  
0x03E2DE|$0F:$E2CE:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $E2E2)
0x03E2E1|$0F:$E2D1:A9 00   	LDA #$00   
0x03E2E3|$0F:$E2D3:85 1C   	STA $1C    
0x03E2E5|$0F:$E2D5:85 1E   	STA $1E    
0x03E2E7|$0F:$E2D7:20 C5 DE	JSR $DEC5  
0x03E2EA|$0F:$E2DA:E6 18   	INC $18    
0x03E2EC|$0F:$E2DC:E6 18   	INC $18    
0x03E2EE|$0F:$E2DE:A5 18   	LDA $18    
0x03E2F0|$0F:$E2E0:C9 12   	CMP #$12   
0x03E2F2|$0F:$E2E2:D0 ED   	BNE $E2D1  
0x03E2F4|$0F:$E2E4:E6 19   	INC $19    
0x03E2F6|$0F:$E2E6:E6 19   	INC $19    
0x03E2F8|$0F:$E2E8:A5 19   	LDA $19    
0x03E2FA|$0F:$E2EA:C9 10   	CMP #$10   
0x03E2FC|$0F:$E2EC:D0 CA   	BNE $E2B8  
0x03E2FE|$0F:$E2EE:A9 FF   	LDA #$FF   
0x03E300|$0F:$E2F0:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03E302|$0F:$E2F2:20 CB D8	JSR $D8CB  
0x03E305|$0F:$E2F5:A9 00   	LDA #$00   
0x03E307|$0F:$E2F7:85 35   	STA $35    	; flag indicating whether any menu is currently open
; control flow target (from $D153, $D18F)
0x03E309|$0F:$E2F9:20 75 F7	JSR $F775  	; load ROM bank #$03
0x03E30C|$0F:$E2FC:A5 27   	LDA $27    	; map palette; offset from ($E27C)
0x03E30E|$0F:$E2FE:C9 68   	CMP #$68   
0x03E310|$0F:$E300:F0 0B   	BEQ $E30D  
0x03E312|$0F:$E302:AD 7A E2	LDA $E27A  
0x03E315|$0F:$E305:85 0E   	STA $0E    
0x03E317|$0F:$E307:AD 7B E2	LDA $E27B  
0x03E31A|$0F:$E30A:4C 17 E3	JMP $E317  

; control flow target (from $E300)
0x03E31D|$0F:$E30D:AD 78 E2	LDA $E278  
0x03E320|$0F:$E310:85 0E   	STA $0E    
0x03E322|$0F:$E312:AD 79 E2	LDA $E279  
0x03E325|$0F:$E315:85 0F   	STA $0F    	; useless op
; control flow target (from $E30A)
0x03E327|$0F:$E317:85 0F   	STA $0F    
0x03E329|$0F:$E319:AD 7C E2	LDA $E27C  
0x03E32C|$0F:$E31C:18      	CLC        
0x03E32D|$0F:$E31D:65 27   	ADC $27    	; map palette; offset from ($E27C)
0x03E32F|$0F:$E31F:85 10   	STA $10    
0x03E331|$0F:$E321:AD 7D E2	LDA $E27D  
0x03E334|$0F:$E324:69 00   	ADC #$00   
0x03E336|$0F:$E326:85 11   	STA $11    
0x03E338|$0F:$E328:A9 FF   	LDA #$FF   
0x03E33A|$0F:$E32A:85 0D   	STA $0D    
0x03E33C|$0F:$E32C:20 CD C2	JSR $C2CD  
; control flow target (from $D3C5, $D4A9)
0x03E33F|$0F:$E32F:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E341|$0F:$E331:10 04   	BPL $E337  
0x03E343|$0F:$E333:A9 0C   	LDA #$0C   	; Music ID #$0C: game menu / Wellgarth singer BGM
0x03E345|$0F:$E335:D0 44   	BNE $E37B  
; control flow target (from $E331)
0x03E347|$0F:$E337:D0 4E   	BNE $E387  
0x03E349|$0F:$E339:A5 CF   	LDA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03E34B|$0F:$E33B:29 04   	AND #$04   
0x03E34D|$0F:$E33D:F0 04   	BEQ $E343  
0x03E34F|$0F:$E33F:A9 16   	LDA #$16   	; Music ID #$16: sea BGM
0x03E351|$0F:$E341:D0 38   	BNE $E37B  
; control flow target (from $E33D)
0x03E353|$0F:$E343:A5 16   	LDA $16    	; current map X-pos (1)
0x03E355|$0F:$E345:C9 20   	CMP #$20   
0x03E357|$0F:$E347:90 12   	BCC $E35B  
0x03E359|$0F:$E349:C9 57   	CMP #$57   
0x03E35B|$0F:$E34B:B0 0E   	BCS $E35B  
0x03E35D|$0F:$E34D:A5 17   	LDA $17    	; current map Y-pos (1)
0x03E35F|$0F:$E34F:C9 17   	CMP #$17   
0x03E361|$0F:$E351:90 08   	BCC $E35B  
0x03E363|$0F:$E353:C9 56   	CMP #$56   
0x03E365|$0F:$E355:B0 04   	BCS $E35B  
0x03E367|$0F:$E357:A9 0D   	LDA #$0D   	; Music ID #$0D: Tantegel BGM
0x03E369|$0F:$E359:D0 20   	BNE $E37B  
; control flow target (from $E347, $E34B, $E351, $E355)
0x03E36B|$0F:$E35B:A0 00   	LDY #$00   
0x03E36D|$0F:$E35D:84 0C   	STY $0C    
; control flow target (from $E36D)
0x03E36F|$0F:$E35F:B9 2D 06	LDA $062D,Y	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03E372|$0F:$E362:10 02   	BPL $E366  
0x03E374|$0F:$E364:E6 0C   	INC $0C    
; control flow target (from $E362)
0x03E376|$0F:$E366:98      	TYA        
0x03E377|$0F:$E367:18      	CLC        
0x03E378|$0F:$E368:69 12   	ADC #$12   
0x03E37A|$0F:$E36A:A8      	TAY        
0x03E37B|$0F:$E36B:C9 36   	CMP #$36   
0x03E37D|$0F:$E36D:90 F0   	BCC $E35F  
0x03E37F|$0F:$E36F:A5 0C   	LDA $0C    
0x03E381|$0F:$E371:C9 03   	CMP #$03   
0x03E383|$0F:$E373:F0 04   	BEQ $E379  
0x03E385|$0F:$E375:A9 15   	LDA #$15   	; Music ID #$15: small party BGM
0x03E387|$0F:$E377:D0 02   	BNE $E37B  
; control flow target (from $E373)
0x03E389|$0F:$E379:A9 14   	LDA #$14   	; Music ID #$14: full party BGM
; control flow target (from $E335, $E341, $E359, $E377, $E38D, $E395, $E3A4, $E3AC, $E3B1)
0x03E38B|$0F:$E37B:CD F7 05	CMP $05F7  	; probably BGM for current area
0x03E38E|$0F:$E37E:F0 06   	BEQ $E386  
0x03E390|$0F:$E380:8D F7 05	STA $05F7  	; probably BGM for current area
0x03E393|$0F:$E383:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
; control flow target (from $E37E)
0x03E396|$0F:$E386:60      	RTS        

; control flow target (from $E337)
0x03E397|$0F:$E387:C9 03   	CMP #$03   
0x03E399|$0F:$E389:D0 04   	BNE $E38F  
0x03E39B|$0F:$E38B:A9 11   	LDA #$11   	; Music ID #$11: tower BGM
0x03E39D|$0F:$E38D:D0 EC   	BNE $E37B  
; control flow target (from $E389)
0x03E39F|$0F:$E38F:C9 02   	CMP #$02   
0x03E3A1|$0F:$E391:D0 04   	BNE $E397  
0x03E3A3|$0F:$E393:A9 10   	LDA #$10   	; Music ID #$10: cave BGM
0x03E3A5|$0F:$E395:D0 E4   	BNE $E37B  
; control flow target (from $E391)
0x03E3A7|$0F:$E397:A6 31   	LDX $31    	; current map ID
0x03E3A9|$0F:$E399:E0 09   	CPX #$09   	; Map ID #$09: Moonbrooke
0x03E3AB|$0F:$E39B:D0 09   	BNE $E3A6  
0x03E3AD|$0F:$E39D:AD AD 61	LDA $61AD  
0x03E3B0|$0F:$E3A0:F0 04   	BEQ $E3A6  
0x03E3B2|$0F:$E3A2:A9 0E   	LDA #$0E   	; Music ID #$0E: town music 1 BGM
0x03E3B4|$0F:$E3A4:D0 D5   	BNE $E37B  
; control flow target (from $E39B, $E3A0)
0x03E3B6|$0F:$E3A6:E0 19   	CPX #$19   	; Map ID #$19: Shrine NW of Midenhall
0x03E3B8|$0F:$E3A8:90 04   	BCC $E3AE  
0x03E3BA|$0F:$E3AA:A9 13   	LDA #$13   	; Music ID #$13: shrine BGM
0x03E3BC|$0F:$E3AC:D0 CD   	BNE $E37B  
; control flow target (from $E3A8)
0x03E3BE|$0F:$E3AE:BD B3 E3	LDA $E3B3,X	; map BGM
0x03E3C1|$0F:$E3B1:D0 C8   	BNE $E37B  

; code -> data
; map BGM
; indexed data load target (from $E3AE)
0x03E3C3|$0F:$E3B3:0E	; Map ID #$00: Fake Midenhall; Music ID #$0E: town music 1 BGM
0x03E3C4|$0F:$E3B4:0E	; Map ID #$01: World Map; Music ID #$0E: town music 1 BGM
0x03E3C5|$0F:$E3B5:0E	; Map ID #$02: Midenhall 2F; Music ID #$0E: town music 1 BGM
0x03E3C6|$0F:$E3B6:0E	; Map ID #$03: Midenhall 1F; Music ID #$0E: town music 1 BGM
0x03E3C7|$0F:$E3B7:0E	; Map ID #$04: Midenhall B1; Music ID #$0E: town music 1 BGM
0x03E3C8|$0F:$E3B8:0F	; Map ID #$05: Leftwyne; Music ID #$0F: town music 2 BGM
0x03E3C9|$0F:$E3B9:0E	; Map ID #$06: Cannock; Music ID #$0E: town music 1 BGM
0x03E3CA|$0F:$E3BA:0F	; Map ID #$07: Hamlin; Music ID #$0F: town music 2 BGM
0x03E3CB|$0F:$E3BB:0F	; Map ID #$08: Hamlin Waterway; Music ID #$0F: town music 2 BGM
0x03E3CC|$0F:$E3BC:10	; Map ID #$09: Moonbrooke; Music ID #$10: cave BGM
0x03E3CD|$0F:$E3BD:10	; Map ID #$0A: Moonbrooke B1; Music ID #$10: cave BGM
0x03E3CE|$0F:$E3BE:0F	; Map ID #$0B: Lianport; Music ID #$0F: town music 2 BGM
0x03E3CF|$0F:$E3BF:0E	; Map ID #$0C: Tantegel; Music ID #$0E: town music 1 BGM
0x03E3D0|$0F:$E3C0:0E	; Map ID #$0D: Tantegel Town 2F; Music ID #$0E: town music 1 BGM
0x03E3D1|$0F:$E3C1:0E	; Map ID #$0E: Tantegel Castle 2F; Music ID #$0E: town music 1 BGM
0x03E3D2|$0F:$E3C2:0E	; Map ID #$0F: Osterfair; Music ID #$0E: town music 1 BGM
0x03E3D3|$0F:$E3C3:0F	; Map ID #$10: Zahan; Music ID #$0F: town music 2 BGM
0x03E3D4|$0F:$E3C4:0F	; Map ID #$11: Tuhn; Music ID #$0F: town music 2 BGM
0x03E3D5|$0F:$E3C5:0F	; Map ID #$12: Tuhn Watergate; Music ID #$0F: town music 2 BGM
0x03E3D6|$0F:$E3C6:0F	; Map ID #$13: Wellgarth; Music ID #$0F: town music 2 BGM
0x03E3D7|$0F:$E3C7:0F	; Map ID #$14: Wellgarth Underground; Music ID #$0F: town music 2 BGM
0x03E3D8|$0F:$E3C8:0F	; Map ID #$15: Beran; Music ID #$0F: town music 2 BGM
0x03E3D9|$0F:$E3C9:10	; Map ID #$16: Hargon's Castle 1F; Music ID #$10: cave BGM
0x03E3DA|$0F:$E3CA:11	; Map ID #$17: Hargon's Castle 7F; Music ID #$11: tower BGM
0x03E3DB|$0F:$E3CB:10	; Map ID #$18: Charlock Castle B8; Music ID #$10: cave BGM

; data -> code
; control flow target (from $D6DA, $E290)
0x03E3DC|$0F:$E3CC:A9 00   	LDA #$00   
0x03E3DE|$0F:$E3CE:85 3B   	STA $3B    	; high nybble = terrain ID
0x03E3E0|$0F:$E3D0:8D 59 01	STA $0159  
0x03E3E3|$0F:$E3D3:8D 5A 01	STA $015A  
0x03E3E6|$0F:$E3D6:8D 5B 01	STA $015B  
0x03E3E9|$0F:$E3D9:60      	RTS        

; control flow target (from $E2B1)
0x03E3EA|$0F:$E3DA:A5 16   	LDA $16    	; current map X-pos (1)
0x03E3EC|$0F:$E3DC:85 0C   	STA $0C    
0x03E3EE|$0F:$E3DE:A5 17   	LDA $17    	; current map Y-pos (1)
0x03E3F0|$0F:$E3E0:85 0E   	STA $0E    
0x03E3F2|$0F:$E3E2:20 89 DF	JSR $DF89  
0x03E3F5|$0F:$E3E5:20 4A DF	JSR $DF4A  
0x03E3F8|$0F:$E3E8:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03E3FB|$0F:$E3EB:A0 04   	LDY #$04   
0x03E3FD|$0F:$E3ED:B1 10   	LDA ($10),Y
0x03E3FF|$0F:$E3EF:29 F0   	AND #$F0   
0x03E401|$0F:$E3F1:85 3C   	STA $3C    
0x03E403|$0F:$E3F3:20 22 E2	JSR $E222  
0x03E406|$0F:$E3F6:A5 0D   	LDA $0D    
0x03E408|$0F:$E3F8:85 1D   	STA $1D    
0x03E40A|$0F:$E3FA:60      	RTS        


; code -> data
; -> $02:$8018: map header info (exterior border tile ID, width, height, pointer low byte, pointer high byte, ?, ?, palette)
; data load target (from $E475)
0x03E40B|$0F:$E3FB:18
; data load target (from $E47D)
0x03E40C|$0F:$E3FC:   80	; $02:$8018; map header info (exterior border tile ID, width, height, pointer low byte, pointer high byte, ?, ?, palette)

; data -> code
; control flow target (from $E28D)
0x03E40D|$0F:$E3FD:A5 31   	LDA $31    	; current map ID
0x03E40F|$0F:$E3FF:C9 01   	CMP #$01   	; Map ID #$01: World Map
0x03E411|$0F:$E401:D0 04   	BNE $E407  
0x03E413|$0F:$E403:A9 00   	LDA #$00   	; World Map uses #$00
0x03E415|$0F:$E405:F0 12   	BEQ $E419  
; control flow target (from $E401)
0x03E417|$0F:$E407:C9 2B   	CMP #$2B   	; Map ID #$2B: Cave to Hamlin
0x03E419|$0F:$E409:B0 04   	BCS $E40F  
0x03E41B|$0F:$E40B:A9 01   	LDA #$01   	; other non-dungeon maps use #$01
0x03E41D|$0F:$E40D:D0 0A   	BNE $E419  
; control flow target (from $E409)
0x03E41F|$0F:$E40F:C9 44   	CMP #$44   	; Map ID #$44: Hargon's Castle 2F
0x03E421|$0F:$E411:B0 04   	BCS $E417  
0x03E423|$0F:$E413:A9 02   	LDA #$02   	; other maps up to #$44 use #$02
0x03E425|$0F:$E415:D0 02   	BNE $E419  
; control flow target (from $E411)
0x03E427|$0F:$E417:A9 03   	LDA #$03   	; maps >= #$44 use #$03
; control flow target (from $E405, $E40D, $E415)
0x03E429|$0F:$E419:85 1F   	STA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E42B|$0F:$E41B:85 0C   	STA $0C    
0x03E42D|$0F:$E41D:20 5C F7	JSR $F75C  	; load ROM bank #$00
; call to code in a different bank ($00:$8000)
0x03E430|$0F:$E420:20 00 80	JSR $8000  
0x03E433|$0F:$E423:A5 31   	LDA $31    	; current map ID
0x03E435|$0F:$E425:D0 04   	BNE $E42B  	; Map ID #$00: Fake Midenhall
0x03E437|$0F:$E427:A9 FF   	LDA #$FF   
0x03E439|$0F:$E429:D0 07   	BNE $E432  
; control flow target (from $E425)
0x03E43B|$0F:$E42B:AD FC 05	LDA $05FC  
0x03E43E|$0F:$E42E:F0 0B   	BEQ $E43B  
0x03E440|$0F:$E430:A9 00   	LDA #$00   
; control flow target (from $E429)
0x03E442|$0F:$E432:8D FC 05	STA $05FC  
0x03E445|$0F:$E435:20 61 F7	JSR $F761  	; load ROM bank #$06
; call to code in a different bank ($06:$A319)
0x03E448|$0F:$E438:20 19 A3	JSR $A319  	; if $05FC is #$00, copy battle stats at $015D,Y to field stats at $0600,X, otherwise copy field stats at $0600,X to battle stats at $015D,Y
; control flow target (from $E42E)
0x03E44B|$0F:$E43B:A9 04   	LDA #$04   
0x03E44D|$0F:$E43D:85 0C   	STA $0C    
0x03E44F|$0F:$E43F:20 5C F7	JSR $F75C  	; load ROM bank #$00
; call to code in a different bank ($00:$8000)
0x03E452|$0F:$E442:20 00 80	JSR $8000  
0x03E455|$0F:$E445:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03E458|$0F:$E448:A5 31   	LDA $31    	; current map ID
0x03E45A|$0F:$E44A:C9 01   	CMP #$01   	; Map ID #$01: World Map
0x03E45C|$0F:$E44C:D0 03   	BNE $E451  
0x03E45E|$0F:$E44E:20 A2 E5	JSR $E5A2  
; control flow target (from $E44C)
0x03E461|$0F:$E451:A9 08   	LDA #$08   
0x03E463|$0F:$E453:85 14   	STA $14    
0x03E465|$0F:$E455:A9 07   	LDA #$07   
0x03E467|$0F:$E457:85 15   	STA $15    
0x03E469|$0F:$E459:A9 00   	LDA #$00   
0x03E46B|$0F:$E45B:85 05   	STA $05    
0x03E46D|$0F:$E45D:85 06   	STA $06    
0x03E46F|$0F:$E45F:85 04   	STA $04    
; control flow target (from $E92A)
0x03E471|$0F:$E461:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03E474|$0F:$E464:A9 00   	LDA #$00   
0x03E476|$0F:$E466:85 0D   	STA $0D    	; multiplication high byte
0x03E478|$0F:$E468:85 0F   	STA $0F    	; multiplication high byte
0x03E47A|$0F:$E46A:A5 31   	LDA $31    	; current map ID
0x03E47C|$0F:$E46C:85 0C   	STA $0C    	; multiplication low byte
0x03E47E|$0F:$E46E:A9 08   	LDA #$08   
0x03E480|$0F:$E470:85 0E   	STA $0E    	; multiplication low byte
0x03E482|$0F:$E472:20 39 C3	JSR $C339  	; 16-bit multiplication: ($10-$11) = ($0C-$0D) * ($0E-$0F); consumes $0C-$0F
0x03E485|$0F:$E475:AD FB E3	LDA $E3FB  	; -> $02:$8018: map header info (exterior border tile ID, width, height, pointer low byte, pointer high byte, ?, ?, palette)
0x03E488|$0F:$E478:18      	CLC        
0x03E489|$0F:$E479:65 10   	ADC $10    	; add low byte of map ID * 8
0x03E48B|$0F:$E47B:85 10   	STA $10    
0x03E48D|$0F:$E47D:AD FC E3	LDA $E3FC  
0x03E490|$0F:$E480:65 11   	ADC $11    	; add high byte of map ID * 8
0x03E492|$0F:$E482:85 11   	STA $11    
0x03E494|$0F:$E484:A0 00   	LDY #$00   
; control flow target (from $E48E)
0x03E496|$0F:$E486:B1 10   	LDA ($10),Y
0x03E498|$0F:$E488:99 20 00	STA $0020,Y	; map exterior border tile ID (#$00 = Road, #$01 = Grass, #$02 = Sand, #$03 = Tree, #$04 = Water, #$05 = Vertical Wall, #$06 = Shrub, #$07 = Horizontal Wall, #$08 = Swamp, ..., #$20 = Ceiling Alternating?, #$21 = Ceiling Down?, #$24 = Black?, #$28 = Blue?)
0x03E49B|$0F:$E48B:C8      	INY        
0x03E49C|$0F:$E48C:C0 08   	CPY #$08   	; copy 8 byte map header to $20
0x03E49E|$0F:$E48E:D0 F6   	BNE $E486  
0x03E4A0|$0F:$E490:AD AD 61	LDA $61AD  
0x03E4A3|$0F:$E493:F0 14   	BEQ $E4A9  
0x03E4A5|$0F:$E495:A5 31   	LDA $31    	; current map ID
0x03E4A7|$0F:$E497:C9 09   	CMP #$09   	; Map ID #$09: Moonbrooke
0x03E4A9|$0F:$E499:D0 0E   	BNE $E4A9  
0x03E4AB|$0F:$E49B:AD D7 86	LDA $86D7  	; -> $02:$A201: Map ID #$6D: Moonbrooke (prologue)
0x03E4AE|$0F:$E49E:85 23   	STA $23    	; map pointer, low byte
0x03E4B0|$0F:$E4A0:AD D8 86	LDA $86D8  
0x03E4B3|$0F:$E4A3:85 24   	STA $24    	; map pointer, high byte
0x03E4B5|$0F:$E4A5:A9 02   	LDA #$02   
0x03E4B7|$0F:$E4A7:85 20   	STA $20    	; map exterior border tile ID (#$00 = Road, #$01 = Grass, #$02 = Sand, #$03 = Tree, #$04 = Water, #$05 = Vertical Wall, #$06 = Shrub, #$07 = Horizontal Wall, #$08 = Swamp, ..., #$20 = Ceiling Alternating?, #$21 = Ceiling Down?, #$24 = Black?, #$28 = Blue?)
; control flow target (from $E493, $E499)
0x03E4B9|$0F:$E4A9:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E4BB|$0F:$E4AB:F0 03   	BEQ $E4B0  
; call to code in a different bank ($02:$AB89)
0x03E4BD|$0F:$E4AD:20 89 AB	JSR $AB89  
; control flow target (from $E4AB)
0x03E4C0|$0F:$E4B0:A5 31   	LDA $31    	; current map ID
0x03E4C2|$0F:$E4B2:C9 12   	CMP #$12   	; Map ID #$12: Tuhn Watergate
0x03E4C4|$0F:$E4B4:D0 08   	BNE $E4BE  
0x03E4C6|$0F:$E4B6:A5 CE   	LDA $CE    	; Tuhn Watergate open flag (#$00 = closed, #$01 = open)
0x03E4C8|$0F:$E4B8:F0 04   	BEQ $E4BE  
0x03E4CA|$0F:$E4BA:A9 04   	LDA #$04   
0x03E4CC|$0F:$E4BC:85 20   	STA $20    	; map exterior border tile ID (#$00 = Road, #$01 = Grass, #$02 = Sand, #$03 = Tree, #$04 = Water, #$05 = Vertical Wall, #$06 = Shrub, #$07 = Horizontal Wall, #$08 = Swamp, ..., #$20 = Ceiling Alternating?, #$21 = Ceiling Down?, #$24 = Black?, #$28 = Blue?)
; control flow target (from $E4B4, $E4B8)
0x03E4CE|$0F:$E4BE:20 F7 D2	JSR $D2F7  
0x03E4D1|$0F:$E4C1:A9 00   	LDA #$00   
0x03E4D3|$0F:$E4C3:85 39   	STA $39    
0x03E4D5|$0F:$E4C5:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03E4D7|$0F:$E4C7:85 36   	STA $36    
0x03E4D9|$0F:$E4C9:85 03   	STA $03    	; game clock?
0x03E4DB|$0F:$E4CB:A9 18   	LDA #$18   
0x03E4DD|$0F:$E4CD:85 3A   	STA $3A    
0x03E4DF|$0F:$E4CF:A0 18   	LDY #$18   
; control flow target (from $E4DD)
0x03E4E1|$0F:$E4D1:A9 FF   	LDA #$FF   
0x03E4E3|$0F:$E4D3:99 41 05	STA $0541,Y	; NPC #$00 sprite ID
0x03E4E6|$0F:$E4D6:98      	TYA        
0x03E4E7|$0F:$E4D7:18      	CLC        
0x03E4E8|$0F:$E4D8:69 08   	ADC #$08   
0x03E4EA|$0F:$E4DA:A8      	TAY        
0x03E4EB|$0F:$E4DB:C9 B8   	CMP #$B8   
0x03E4ED|$0F:$E4DD:D0 F2   	BNE $E4D1  
0x03E4EF|$0F:$E4DF:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03E4F2|$0F:$E4E2:A5 D0   	LDA $D0    	; Malroth status flag (#$FF = defeated, #$00 = alive, others = countdown to battle)
0x03E4F4|$0F:$E4E4:10 19   	BPL $E4FF  
0x03E4F6|$0F:$E4E6:A5 31   	LDA $31    	; current map ID
0x03E4F8|$0F:$E4E8:C9 03   	CMP #$03   	; Map ID #$03: Midenhall 1F
0x03E4FA|$0F:$E4EA:D0 13   	BNE $E4FF  
0x03E4FC|$0F:$E4EC:20 DA FE	JSR $FEDA  	; parse byte following JSR for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank

; code -> data
; indirect data load target
0x03E4FF|$0F:$E4EF:49	; $02:$8012; -> $02:$B351: looks like more NPC data?

; data -> code
0x03E500|$0F:$E4F0:A5 D6   	LDA $D6    
0x03E502|$0F:$E4F2:85 0C   	STA $0C    
0x03E504|$0F:$E4F4:A5 D7   	LDA $D7    
0x03E506|$0F:$E4F6:85 0D   	STA $0D    
0x03E508|$0F:$E4F8:20 FA FE	JSR $FEFA  	; increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank

; code -> data
; indirect data load target
0x03E50B|$0F:$E4FB:49	; $02:$8012; -> $02:$B351: looks like more NPC data?

; data -> code
0x03E50C|$0F:$E4FC:4C 70 E5	JMP $E570  

; control flow target (from $E4E4, $E4EA)
0x03E50F|$0F:$E4FF:AD AD 61	LDA $61AD  
0x03E512|$0F:$E502:F0 1F   	BEQ $E523  
0x03E514|$0F:$E504:A5 31   	LDA $31    	; current map ID
0x03E516|$0F:$E506:C9 09   	CMP #$09   	; Map ID #$09: Moonbrooke
0x03E518|$0F:$E508:F0 08   	BEQ $E512  
0x03E51A|$0F:$E50A:C9 01   	CMP #$01   	; Map ID #$01: World Map
0x03E51C|$0F:$E50C:F0 08   	BEQ $E516  
0x03E51E|$0F:$E50E:A9 6E   	LDA #$6E   
0x03E520|$0F:$E510:D0 13   	BNE $E525  
; control flow target (from $E508)
0x03E522|$0F:$E512:A9 6D   	LDA #$6D   
0x03E524|$0F:$E514:D0 0F   	BNE $E525  
; control flow target (from $E50C)
0x03E526|$0F:$E516:A0 6F   	LDY #$6F   
0x03E528|$0F:$E518:AD AD 61	LDA $61AD  
0x03E52B|$0F:$E51B:C9 FE   	CMP #$FE   
0x03E52D|$0F:$E51D:D0 01   	BNE $E520  
0x03E52F|$0F:$E51F:C8      	INY        
; control flow target (from $E51D)
0x03E530|$0F:$E520:98      	TYA        
0x03E531|$0F:$E521:D0 02   	BNE $E525  
; control flow target (from $E502)
0x03E533|$0F:$E523:A5 31   	LDA $31    	; current map ID
; control flow target (from $E510, $E514, $E521)
0x03E535|$0F:$E525:0A      	ASL        
0x03E536|$0F:$E526:A8      	TAY        
0x03E537|$0F:$E527:B9 39 A5	LDA $A539,Y	; pointers to per-map NPC setup (X-pos, Y-pos, ???, sprite ID, dialogue [not string] ID)
0x03E53A|$0F:$E52A:85 0C   	STA $0C    
0x03E53C|$0F:$E52C:B9 3A A5	LDA $A53A,Y
0x03E53F|$0F:$E52F:85 0D   	STA $0D    
0x03E541|$0F:$E531:05 0C   	ORA $0C    
0x03E543|$0F:$E533:D0 3B   	BNE $E570  	; zero pointer => no NPCs
0x03E545|$0F:$E535:A5 31   	LDA $31    	; current map ID
0x03E547|$0F:$E537:C9 01   	CMP #$01   	; Map ID #$01: World Map
0x03E549|$0F:$E539:D0 2D   	BNE $E568  	; if we're on the world map, check to see if we need to add the ship sprite
0x03E54B|$0F:$E53B:AD AD 61	LDA $61AD  
0x03E54E|$0F:$E53E:D0 12   	BNE $E552  
0x03E550|$0F:$E540:A5 CF   	LDA $CF    	; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins)
0x03E552|$0F:$E542:29 06   	AND #$06   
0x03E554|$0F:$E544:C9 02   	CMP #$02   
0x03E556|$0F:$E546:D0 20   	BNE $E568  
0x03E558|$0F:$E548:A5 D2   	LDA $D2    	; ship X-pos (when you aren't on it)
0x03E55A|$0F:$E54A:8D D4 05	STA $05D4  	; NPC #$13 X-pos
0x03E55D|$0F:$E54D:A5 D3   	LDA $D3    	; ship Y-pos (when you aren't on it)
0x03E55F|$0F:$E54F:8D D5 05	STA $05D5  	; NPC #$13 Y-pos
; control flow target (from $E53E)
0x03E562|$0F:$E552:A9 00   	LDA #$00   
0x03E564|$0F:$E554:8D D6 05	STA $05D6  	; NPC #$13 ?
0x03E567|$0F:$E557:8D D7 05	STA $05D7  	; NPC #$13 ?
0x03E56A|$0F:$E55A:85 38   	STA $38    
0x03E56C|$0F:$E55C:A9 01   	LDA #$01   
0x03E56E|$0F:$E55E:8D D8 05	STA $05D8  	; NPC #$13 motion nybble + direction nybble
0x03E571|$0F:$E561:A9 05   	LDA #$05   
0x03E573|$0F:$E563:8D D9 05	STA $05D9  	; NPC #$13 sprite ID
0x03E576|$0F:$E566:D0 04   	BNE $E56C  
; control flow target (from $E539, $E546)
0x03E578|$0F:$E568:A9 FF   	LDA #$FF   
0x03E57A|$0F:$E56A:85 38   	STA $38    
; control flow target (from $E566, $E57A)
0x03E57C|$0F:$E56C:20 8F CD	JSR $CD8F  
0x03E57F|$0F:$E56F:60      	RTS        

; control flow target (from $E4FC, $E533)
0x03E580|$0F:$E570:A0 00   	LDY #$00   
0x03E582|$0F:$E572:84 38   	STY $38    
0x03E584|$0F:$E574:A2 18   	LDX #$18   
; control flow target (from $E5A0)
0x03E586|$0F:$E576:B1 0C   	LDA ($0C),Y
0x03E588|$0F:$E578:C9 FF   	CMP #$FF   
0x03E58A|$0F:$E57A:F0 F0   	BEQ $E56C  
0x03E58C|$0F:$E57C:9D 3C 05	STA $053C,X	; NPC #$00 ?
0x03E58F|$0F:$E57F:C8      	INY        
0x03E590|$0F:$E580:B1 0C   	LDA ($0C),Y
0x03E592|$0F:$E582:9D 3D 05	STA $053D,X	; NPC #$00 ?
0x03E595|$0F:$E585:C8      	INY        
0x03E596|$0F:$E586:A9 00   	LDA #$00   
0x03E598|$0F:$E588:9D 3E 05	STA $053E,X	; NPC #$00 ?
0x03E59B|$0F:$E58B:9D 3F 05	STA $053F,X	; NPC #$00 ?
0x03E59E|$0F:$E58E:B1 0C   	LDA ($0C),Y
0x03E5A0|$0F:$E590:9D 40 05	STA $0540,X	; NPC #$00 ? + direction nybble
0x03E5A3|$0F:$E593:C8      	INY        
0x03E5A4|$0F:$E594:B1 0C   	LDA ($0C),Y
0x03E5A6|$0F:$E596:9D 41 05	STA $0541,X	; NPC #$00 sprite ID
0x03E5A9|$0F:$E599:C8      	INY        
0x03E5AA|$0F:$E59A:C8      	INY        
0x03E5AB|$0F:$E59B:8A      	TXA        
0x03E5AC|$0F:$E59C:18      	CLC        
0x03E5AD|$0F:$E59D:69 08   	ADC #$08   
0x03E5AF|$0F:$E59F:AA      	TAX        
0x03E5B0|$0F:$E5A0:D0 D4   	BNE $E576  
; control flow target (from $D2BC, $D4F6, $E44E)
0x03E5B2|$0F:$E5A2:A2 00   	LDX #$00   
0x03E5B4|$0F:$E5A4:8A      	TXA        
; control flow target (from $E5AB)
0x03E5B5|$0F:$E5A5:9D 1A 05	STA $051A,X	; something to do with whether you've opened the chest containing the Shield of Erdrick
0x03E5B8|$0F:$E5A8:E8      	INX        
0x03E5B9|$0F:$E5A9:E0 20   	CPX #$20   
0x03E5BB|$0F:$E5AB:D0 F8   	BNE $E5A5  
0x03E5BD|$0F:$E5AD:60      	RTS        

; control flow target (from $E5C2, $E636, $E6B4, $E797)
0x03E5BE|$0F:$E5AE:AD C5 04	LDA $04C5  
0x03E5C1|$0F:$E5B1:D0 01   	BNE $E5B4  
0x03E5C3|$0F:$E5B3:60      	RTS        

; control flow target (from $E5B1)
0x03E5C4|$0F:$E5B4:A5 03   	LDA $03    	; game clock?
0x03E5C6|$0F:$E5B6:48      	PHA        
0x03E5C7|$0F:$E5B7:A9 00   	LDA #$00   
0x03E5C9|$0F:$E5B9:85 0C   	STA $0C    
0x03E5CB|$0F:$E5BB:20 8C F7	JSR $F78C  	; wipe selected menu region
0x03E5CE|$0F:$E5BE:68      	PLA        
0x03E5CF|$0F:$E5BF:85 03   	STA $03    	; game clock?
0x03E5D1|$0F:$E5C1:60      	RTS        

; control flow target (from $C741, $FF6C)
0x03E5D2|$0F:$E5C2:20 AE E5	JSR $E5AE  
0x03E5D5|$0F:$E5C5:A5 03   	LDA $03    	; game clock?
0x03E5D7|$0F:$E5C7:29 0F   	AND #$0F   
0x03E5D9|$0F:$E5C9:F0 05   	BEQ $E5D0  
0x03E5DB|$0F:$E5CB:68      	PLA        
0x03E5DC|$0F:$E5CC:68      	PLA        
0x03E5DD|$0F:$E5CD:4C 47 C7	JMP $C747  

; control flow target (from $E5C9)
0x03E5E0|$0F:$E5D0:E6 28   	INC $28    	; current map X-pos (2)
0x03E5E2|$0F:$E5D2:A9 FF   	LDA #$FF   
0x03E5E4|$0F:$E5D4:8D 3C 05	STA $053C  	; NPC #$00 ?
0x03E5E7|$0F:$E5D7:A9 00   	LDA #$00   
0x03E5E9|$0F:$E5D9:8D 3D 05	STA $053D  	; NPC #$00 ?
0x03E5EC|$0F:$E5DC:A9 01   	LDA #$01   
0x03E5EE|$0F:$E5DE:8D 40 05	STA $0540  	; NPC #$00 ? + direction nybble
0x03E5F1|$0F:$E5E1:20 5B D3	JSR $D35B  
0x03E5F4|$0F:$E5E4:A9 12   	LDA #$12   
0x03E5F6|$0F:$E5E6:85 18   	STA $18    
0x03E5F8|$0F:$E5E8:A9 F2   	LDA #$F2   
0x03E5FA|$0F:$E5EA:85 19   	STA $19    
; control flow target (from $E607)
0x03E5FC|$0F:$E5EC:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E5FF|$0F:$E5EF:A9 00   	LDA #$00   
0x03E601|$0F:$E5F1:85 1C   	STA $1C    
0x03E603|$0F:$E5F3:85 1E   	STA $1E    
0x03E605|$0F:$E5F5:20 C5 DE	JSR $DEC5  
0x03E608|$0F:$E5F8:E6 19   	INC $19    
0x03E60A|$0F:$E5FA:E6 19   	INC $19    
0x03E60C|$0F:$E5FC:E6 05   	INC $05    
0x03E60E|$0F:$E5FE:E6 2A   	INC $2A    	; current map X-pos pixel, low byte
0x03E610|$0F:$E600:20 97 D8	JSR $D897  
0x03E613|$0F:$E603:A5 19   	LDA $19    
0x03E615|$0F:$E605:C9 10   	CMP #$10   
0x03E617|$0F:$E607:D0 E3   	BNE $E5EC  
0x03E619|$0F:$E609:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E61C|$0F:$E60C:E6 05   	INC $05    
0x03E61E|$0F:$E60E:D0 06   	BNE $E616  
0x03E620|$0F:$E610:A5 04   	LDA $04    
0x03E622|$0F:$E612:49 01   	EOR #$01   
0x03E624|$0F:$E614:85 04   	STA $04    
; control flow target (from $E60E)
0x03E626|$0F:$E616:E6 14   	INC $14    
0x03E628|$0F:$E618:A9 1F   	LDA #$1F   
0x03E62A|$0F:$E61A:25 14   	AND $14    
0x03E62C|$0F:$E61C:85 14   	STA $14    
0x03E62E|$0F:$E61E:E6 16   	INC $16    	; current map X-pos (1)
0x03E630|$0F:$E620:E6 2A   	INC $2A    	; current map X-pos pixel, low byte
0x03E632|$0F:$E622:D0 0C   	BNE $E630  
0x03E634|$0F:$E624:E6 2B   	INC $2B    	; current map X-pos pixel, high byte
0x03E636|$0F:$E626:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E638|$0F:$E628:D0 06   	BNE $E630  
0x03E63A|$0F:$E62A:A5 2B   	LDA $2B    	; current map X-pos pixel, high byte
0x03E63C|$0F:$E62C:29 0F   	AND #$0F   
0x03E63E|$0F:$E62E:85 2B   	STA $2B    	; current map X-pos pixel, high byte
; control flow target (from $E622, $E628)
0x03E640|$0F:$E630:20 97 D8	JSR $D897  
0x03E643|$0F:$E633:4C 7A E8	JMP $E87A  

; control flow target (from $C737, $FF72)
0x03E646|$0F:$E636:20 AE E5	JSR $E5AE  
0x03E649|$0F:$E639:A5 03   	LDA $03    	; game clock?
0x03E64B|$0F:$E63B:29 0F   	AND #$0F   
0x03E64D|$0F:$E63D:F0 05   	BEQ $E644  
0x03E64F|$0F:$E63F:68      	PLA        
0x03E650|$0F:$E640:68      	PLA        
0x03E651|$0F:$E641:4C 47 C7	JMP $C747  

; control flow target (from $E63D)
0x03E654|$0F:$E644:C6 28   	DEC $28    	; current map X-pos (2)
0x03E656|$0F:$E646:A9 01   	LDA #$01   
0x03E658|$0F:$E648:8D 3C 05	STA $053C  	; NPC #$00 ?
0x03E65B|$0F:$E64B:A9 00   	LDA #$00   
0x03E65D|$0F:$E64D:8D 3D 05	STA $053D  	; NPC #$00 ?
0x03E660|$0F:$E650:A9 03   	LDA #$03   
0x03E662|$0F:$E652:8D 40 05	STA $0540  	; NPC #$00 ? + direction nybble
0x03E665|$0F:$E655:20 5B D3	JSR $D35B  
0x03E668|$0F:$E658:A9 EC   	LDA #$EC   
0x03E66A|$0F:$E65A:85 18   	STA $18    
0x03E66C|$0F:$E65C:A9 F2   	LDA #$F2   
0x03E66E|$0F:$E65E:85 19   	STA $19    
; control flow target (from $E69B)
0x03E670|$0F:$E660:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E673|$0F:$E663:A9 00   	LDA #$00   
0x03E675|$0F:$E665:85 1C   	STA $1C    
0x03E677|$0F:$E667:85 1E   	STA $1E    
0x03E679|$0F:$E669:20 C5 DE	JSR $DEC5  
0x03E67C|$0F:$E66C:E6 19   	INC $19    
0x03E67E|$0F:$E66E:E6 19   	INC $19    
0x03E680|$0F:$E670:A5 05   	LDA $05    
0x03E682|$0F:$E672:38      	SEC        
0x03E683|$0F:$E673:E9 01   	SBC #$01   
0x03E685|$0F:$E675:85 05   	STA $05    
0x03E687|$0F:$E677:B0 06   	BCS $E67F  
0x03E689|$0F:$E679:A5 04   	LDA $04    
0x03E68B|$0F:$E67B:49 01   	EOR #$01   
0x03E68D|$0F:$E67D:85 04   	STA $04    
; control flow target (from $E677)
0x03E68F|$0F:$E67F:A5 2A   	LDA $2A    	; current map X-pos pixel, low byte
0x03E691|$0F:$E681:38      	SEC        
0x03E692|$0F:$E682:E9 01   	SBC #$01   
0x03E694|$0F:$E684:85 2A   	STA $2A    	; current map X-pos pixel, low byte
0x03E696|$0F:$E686:B0 0C   	BCS $E694  
0x03E698|$0F:$E688:C6 2B   	DEC $2B    	; current map X-pos pixel, high byte
0x03E69A|$0F:$E68A:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E69C|$0F:$E68C:D0 06   	BNE $E694  
0x03E69E|$0F:$E68E:A5 2B   	LDA $2B    	; current map X-pos pixel, high byte
0x03E6A0|$0F:$E690:29 0F   	AND #$0F   
0x03E6A2|$0F:$E692:85 2B   	STA $2B    	; current map X-pos pixel, high byte
; control flow target (from $E686, $E68C)
0x03E6A4|$0F:$E694:20 97 D8	JSR $D897  
0x03E6A7|$0F:$E697:A5 19   	LDA $19    
0x03E6A9|$0F:$E699:C9 10   	CMP #$10   
0x03E6AB|$0F:$E69B:D0 C3   	BNE $E660  
0x03E6AD|$0F:$E69D:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E6B0|$0F:$E6A0:C6 05   	DEC $05    
0x03E6B2|$0F:$E6A2:C6 14   	DEC $14    
0x03E6B4|$0F:$E6A4:A9 1F   	LDA #$1F   
0x03E6B6|$0F:$E6A6:25 14   	AND $14    
0x03E6B8|$0F:$E6A8:85 14   	STA $14    
0x03E6BA|$0F:$E6AA:C6 16   	DEC $16    	; current map X-pos (1)
0x03E6BC|$0F:$E6AC:C6 2A   	DEC $2A    	; current map X-pos pixel, low byte
0x03E6BE|$0F:$E6AE:20 97 D8	JSR $D897  
0x03E6C1|$0F:$E6B1:4C 7A E8	JMP $E87A  

; control flow target (from $C72B, $CABA, $CABD, $CAC0, $FF7E)
0x03E6C4|$0F:$E6B4:20 AE E5	JSR $E5AE  
0x03E6C7|$0F:$E6B7:A5 03   	LDA $03    	; game clock?
0x03E6C9|$0F:$E6B9:29 0F   	AND #$0F   
0x03E6CB|$0F:$E6BB:F0 05   	BEQ $E6C2  
0x03E6CD|$0F:$E6BD:68      	PLA        
0x03E6CE|$0F:$E6BE:68      	PLA        
0x03E6CF|$0F:$E6BF:4C 47 C7	JMP $C747  

; control flow target (from $E6BB)
0x03E6D2|$0F:$E6C2:E6 29   	INC $29    	; current map Y-pos (2)
0x03E6D4|$0F:$E6C4:A9 00   	LDA #$00   
0x03E6D6|$0F:$E6C6:8D 3C 05	STA $053C  	; NPC #$00 ?
0x03E6D9|$0F:$E6C9:A9 FF   	LDA #$FF   
0x03E6DB|$0F:$E6CB:8D 3D 05	STA $053D  	; NPC #$00 ?
0x03E6DE|$0F:$E6CE:A9 02   	LDA #$02   
0x03E6E0|$0F:$E6D0:8D 40 05	STA $0540  	; NPC #$00 ? + direction nybble
0x03E6E3|$0F:$E6D3:20 5B D3	JSR $D35B  
0x03E6E6|$0F:$E6D6:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E6E9|$0F:$E6D9:E6 06   	INC $06    
0x03E6EB|$0F:$E6DB:E6 2C   	INC $2C    	; current map Y-pos pixel, low byte
0x03E6ED|$0F:$E6DD:20 97 D8	JSR $D897  
0x03E6F0|$0F:$E6E0:A9 10   	LDA #$10   
0x03E6F2|$0F:$E6E2:85 19   	STA $19    
0x03E6F4|$0F:$E6E4:A9 EE   	LDA #$EE   
0x03E6F6|$0F:$E6E6:85 18   	STA $18    
; control flow target (from $E70B)
0x03E6F8|$0F:$E6E8:A9 03   	LDA #$03   
0x03E6FA|$0F:$E6EA:85 2E   	STA $2E    
0x03E6FC|$0F:$E6EC:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $E6FE)
0x03E6FF|$0F:$E6EF:A9 0C   	LDA #$0C   
0x03E701|$0F:$E6F1:85 1C   	STA $1C    
0x03E703|$0F:$E6F3:85 1E   	STA $1E    
0x03E705|$0F:$E6F5:20 C5 DE	JSR $DEC5  
0x03E708|$0F:$E6F8:E6 18   	INC $18    
0x03E70A|$0F:$E6FA:E6 18   	INC $18    
0x03E70C|$0F:$E6FC:C6 2E   	DEC $2E    
0x03E70E|$0F:$E6FE:D0 EF   	BNE $E6EF  
0x03E710|$0F:$E700:E6 06   	INC $06    
0x03E712|$0F:$E702:E6 2C   	INC $2C    	; current map Y-pos pixel, low byte
0x03E714|$0F:$E704:20 97 D8	JSR $D897  
0x03E717|$0F:$E707:A5 18   	LDA $18    
0x03E719|$0F:$E709:C9 12   	CMP #$12   
0x03E71B|$0F:$E70B:D0 DB   	BNE $E6E8  
0x03E71D|$0F:$E70D:A9 10   	LDA #$10   
0x03E71F|$0F:$E70F:85 19   	STA $19    
0x03E721|$0F:$E711:A9 EC   	LDA #$EC   
0x03E723|$0F:$E713:85 18   	STA $18    
; control flow target (from $E735)
0x03E725|$0F:$E715:A9 05   	LDA #$05   
0x03E727|$0F:$E717:85 2E   	STA $2E    
0x03E729|$0F:$E719:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $E728)
0x03E72C|$0F:$E71C:20 9A DE	JSR $DE9A  
0x03E72F|$0F:$E71F:A5 18   	LDA $18    
0x03E731|$0F:$E721:18      	CLC        
0x03E732|$0F:$E722:69 04   	ADC #$04   
0x03E734|$0F:$E724:85 18   	STA $18    
0x03E736|$0F:$E726:C6 2E   	DEC $2E    
0x03E738|$0F:$E728:D0 F2   	BNE $E71C  
0x03E73A|$0F:$E72A:E6 06   	INC $06    
0x03E73C|$0F:$E72C:E6 2C   	INC $2C    	; current map Y-pos pixel, low byte
0x03E73E|$0F:$E72E:20 97 D8	JSR $D897  
0x03E741|$0F:$E731:A5 18   	LDA $18    
0x03E743|$0F:$E733:C9 14   	CMP #$14   
0x03E745|$0F:$E735:D0 DE   	BNE $E715  
0x03E747|$0F:$E737:A9 10   	LDA #$10   
0x03E749|$0F:$E739:85 19   	STA $19    
0x03E74B|$0F:$E73B:A9 EE   	LDA #$EE   
0x03E74D|$0F:$E73D:85 18   	STA $18    
; control flow target (from $E762)
0x03E74F|$0F:$E73F:A9 03   	LDA #$03   
0x03E751|$0F:$E741:85 2E   	STA $2E    
0x03E753|$0F:$E743:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $E755)
0x03E756|$0F:$E746:A9 03   	LDA #$03   
0x03E758|$0F:$E748:85 1C   	STA $1C    
0x03E75A|$0F:$E74A:85 1E   	STA $1E    
0x03E75C|$0F:$E74C:20 C5 DE	JSR $DEC5  
0x03E75F|$0F:$E74F:E6 18   	INC $18    
0x03E761|$0F:$E751:E6 18   	INC $18    
0x03E763|$0F:$E753:C6 2E   	DEC $2E    
0x03E765|$0F:$E755:D0 EF   	BNE $E746  
0x03E767|$0F:$E757:E6 06   	INC $06    
0x03E769|$0F:$E759:E6 2C   	INC $2C    	; current map Y-pos pixel, low byte
0x03E76B|$0F:$E75B:20 97 D8	JSR $D897  
0x03E76E|$0F:$E75E:A5 18   	LDA $18    
0x03E770|$0F:$E760:C9 12   	CMP #$12   
0x03E772|$0F:$E762:D0 DB   	BNE $E73F  
0x03E774|$0F:$E764:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E777|$0F:$E767:E6 06   	INC $06    
0x03E779|$0F:$E769:A5 06   	LDA $06    
0x03E77B|$0F:$E76B:C9 F0   	CMP #$F0   
0x03E77D|$0F:$E76D:D0 04   	BNE $E773  
0x03E77F|$0F:$E76F:A9 00   	LDA #$00   
0x03E781|$0F:$E771:85 06   	STA $06    
; control flow target (from $E76D)
0x03E783|$0F:$E773:E6 15   	INC $15    
0x03E785|$0F:$E775:A5 15   	LDA $15    
0x03E787|$0F:$E777:C9 0F   	CMP #$0F   
0x03E789|$0F:$E779:D0 04   	BNE $E77F  
0x03E78B|$0F:$E77B:A9 00   	LDA #$00   
0x03E78D|$0F:$E77D:85 15   	STA $15    
; control flow target (from $E779)
0x03E78F|$0F:$E77F:E6 17   	INC $17    	; current map Y-pos (1)
0x03E791|$0F:$E781:E6 2C   	INC $2C    	; current map Y-pos pixel, low byte
0x03E793|$0F:$E783:D0 0C   	BNE $E791  
0x03E795|$0F:$E785:E6 2D   	INC $2D    	; current map Y-pos pixel, high byte
0x03E797|$0F:$E787:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E799|$0F:$E789:D0 06   	BNE $E791  
0x03E79B|$0F:$E78B:A5 2D   	LDA $2D    	; current map Y-pos pixel, high byte
0x03E79D|$0F:$E78D:29 0F   	AND #$0F   
0x03E79F|$0F:$E78F:85 2D   	STA $2D    	; current map Y-pos pixel, high byte
; control flow target (from $E783, $E789)
0x03E7A1|$0F:$E791:20 97 D8	JSR $D897  
0x03E7A4|$0F:$E794:4C 7A E8	JMP $E87A  

; control flow target (from $C71F, $FF78)
0x03E7A7|$0F:$E797:20 AE E5	JSR $E5AE  
0x03E7AA|$0F:$E79A:A5 03   	LDA $03    	; game clock?
0x03E7AC|$0F:$E79C:29 0F   	AND #$0F   
0x03E7AE|$0F:$E79E:F0 05   	BEQ $E7A5  
0x03E7B0|$0F:$E7A0:68      	PLA        
0x03E7B1|$0F:$E7A1:68      	PLA        
0x03E7B2|$0F:$E7A2:4C 47 C7	JMP $C747  

; control flow target (from $E79E)
0x03E7B5|$0F:$E7A5:C6 29   	DEC $29    	; current map Y-pos (2)
0x03E7B7|$0F:$E7A7:A9 00   	LDA #$00   
0x03E7B9|$0F:$E7A9:8D 3C 05	STA $053C  	; NPC #$00 ?
0x03E7BC|$0F:$E7AC:8D 40 05	STA $0540  	; NPC #$00 ? + direction nybble
0x03E7BF|$0F:$E7AF:A9 01   	LDA #$01   
0x03E7C1|$0F:$E7B1:8D 3D 05	STA $053D  	; NPC #$00 ?
0x03E7C4|$0F:$E7B4:20 5B D3	JSR $D35B  
0x03E7C7|$0F:$E7B7:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E7CA|$0F:$E7BA:C6 06   	DEC $06    
0x03E7CC|$0F:$E7BC:A5 06   	LDA $06    
0x03E7CE|$0F:$E7BE:C9 FF   	CMP #$FF   
0x03E7D0|$0F:$E7C0:D0 04   	BNE $E7C6  
0x03E7D2|$0F:$E7C2:A9 EF   	LDA #$EF   
0x03E7D4|$0F:$E7C4:85 06   	STA $06    
; control flow target (from $E7C0)
0x03E7D6|$0F:$E7C6:A5 2C   	LDA $2C    	; current map Y-pos pixel, low byte
0x03E7D8|$0F:$E7C8:38      	SEC        
0x03E7D9|$0F:$E7C9:E9 01   	SBC #$01   
0x03E7DB|$0F:$E7CB:85 2C   	STA $2C    	; current map Y-pos pixel, low byte
0x03E7DD|$0F:$E7CD:B0 0C   	BCS $E7DB  
0x03E7DF|$0F:$E7CF:C6 2D   	DEC $2D    	; current map Y-pos pixel, high byte
0x03E7E1|$0F:$E7D1:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E7E3|$0F:$E7D3:D0 06   	BNE $E7DB  
0x03E7E5|$0F:$E7D5:A5 2D   	LDA $2D    	; current map Y-pos pixel, high byte
0x03E7E7|$0F:$E7D7:29 0F   	AND #$0F   
0x03E7E9|$0F:$E7D9:85 2D   	STA $2D    	; current map Y-pos pixel, high byte
; control flow target (from $E7CD, $E7D3)
0x03E7EB|$0F:$E7DB:20 97 D8	JSR $D897  
0x03E7EE|$0F:$E7DE:A9 F0   	LDA #$F0   
0x03E7F0|$0F:$E7E0:85 19   	STA $19    
0x03E7F2|$0F:$E7E2:A9 EE   	LDA #$EE   
0x03E7F4|$0F:$E7E4:85 18   	STA $18    
; control flow target (from $E809)
0x03E7F6|$0F:$E7E6:A9 03   	LDA #$03   
0x03E7F8|$0F:$E7E8:85 2E   	STA $2E    
0x03E7FA|$0F:$E7EA:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $E7FC)
0x03E7FD|$0F:$E7ED:A9 03   	LDA #$03   
0x03E7FF|$0F:$E7EF:85 1C   	STA $1C    
0x03E801|$0F:$E7F1:85 1E   	STA $1E    
0x03E803|$0F:$E7F3:20 C5 DE	JSR $DEC5  
0x03E806|$0F:$E7F6:E6 18   	INC $18    
0x03E808|$0F:$E7F8:E6 18   	INC $18    
0x03E80A|$0F:$E7FA:C6 2E   	DEC $2E    
0x03E80C|$0F:$E7FC:D0 EF   	BNE $E7ED  
0x03E80E|$0F:$E7FE:C6 06   	DEC $06    
0x03E810|$0F:$E800:C6 2C   	DEC $2C    	; current map Y-pos pixel, low byte
0x03E812|$0F:$E802:20 97 D8	JSR $D897  
0x03E815|$0F:$E805:A5 18   	LDA $18    
0x03E817|$0F:$E807:C9 12   	CMP #$12   
0x03E819|$0F:$E809:D0 DB   	BNE $E7E6  
0x03E81B|$0F:$E80B:A9 F0   	LDA #$F0   
0x03E81D|$0F:$E80D:85 19   	STA $19    
0x03E81F|$0F:$E80F:A9 EC   	LDA #$EC   
0x03E821|$0F:$E811:85 18   	STA $18    
; control flow target (from $E833)
0x03E823|$0F:$E813:A9 05   	LDA #$05   
0x03E825|$0F:$E815:85 2E   	STA $2E    
0x03E827|$0F:$E817:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $E826)
0x03E82A|$0F:$E81A:20 9A DE	JSR $DE9A  
0x03E82D|$0F:$E81D:A5 18   	LDA $18    
0x03E82F|$0F:$E81F:18      	CLC        
0x03E830|$0F:$E820:69 04   	ADC #$04   
0x03E832|$0F:$E822:85 18   	STA $18    
0x03E834|$0F:$E824:C6 2E   	DEC $2E    
0x03E836|$0F:$E826:D0 F2   	BNE $E81A  
0x03E838|$0F:$E828:C6 06   	DEC $06    
0x03E83A|$0F:$E82A:C6 2C   	DEC $2C    	; current map Y-pos pixel, low byte
0x03E83C|$0F:$E82C:20 97 D8	JSR $D897  
0x03E83F|$0F:$E82F:A5 18   	LDA $18    
0x03E841|$0F:$E831:C9 14   	CMP #$14   
0x03E843|$0F:$E833:D0 DE   	BNE $E813  
0x03E845|$0F:$E835:A9 F0   	LDA #$F0   
0x03E847|$0F:$E837:85 19   	STA $19    
0x03E849|$0F:$E839:A9 EE   	LDA #$EE   
0x03E84B|$0F:$E83B:85 18   	STA $18    
; control flow target (from $E860)
0x03E84D|$0F:$E83D:A9 03   	LDA #$03   
0x03E84F|$0F:$E83F:85 2E   	STA $2E    
0x03E851|$0F:$E841:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $E853)
0x03E854|$0F:$E844:A9 0C   	LDA #$0C   
0x03E856|$0F:$E846:85 1C   	STA $1C    
0x03E858|$0F:$E848:85 1E   	STA $1E    
0x03E85A|$0F:$E84A:20 C5 DE	JSR $DEC5  
0x03E85D|$0F:$E84D:E6 18   	INC $18    
0x03E85F|$0F:$E84F:E6 18   	INC $18    
0x03E861|$0F:$E851:C6 2E   	DEC $2E    
0x03E863|$0F:$E853:D0 EF   	BNE $E844  
0x03E865|$0F:$E855:C6 06   	DEC $06    
0x03E867|$0F:$E857:C6 2C   	DEC $2C    	; current map Y-pos pixel, low byte
0x03E869|$0F:$E859:20 97 D8	JSR $D897  
0x03E86C|$0F:$E85C:A5 18   	LDA $18    
0x03E86E|$0F:$E85E:C9 12   	CMP #$12   
0x03E870|$0F:$E860:D0 DB   	BNE $E83D  
0x03E872|$0F:$E862:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E875|$0F:$E865:C6 06   	DEC $06    
0x03E877|$0F:$E867:C6 15   	DEC $15    
0x03E879|$0F:$E869:A5 15   	LDA $15    
0x03E87B|$0F:$E86B:C9 FF   	CMP #$FF   
0x03E87D|$0F:$E86D:D0 04   	BNE $E873  
0x03E87F|$0F:$E86F:A9 0E   	LDA #$0E   
0x03E881|$0F:$E871:85 15   	STA $15    
; control flow target (from $E86D)
0x03E883|$0F:$E873:C6 17   	DEC $17    	; current map Y-pos (1)
0x03E885|$0F:$E875:C6 2C   	DEC $2C    	; current map Y-pos pixel, low byte
0x03E887|$0F:$E877:20 97 D8	JSR $D897  
; control flow target (from $E633, $E6B1, $E794)
0x03E88A|$0F:$E87A:A5 16   	LDA $16    	; current map X-pos (1)
0x03E88C|$0F:$E87C:85 12   	STA $12    
0x03E88E|$0F:$E87E:A5 17   	LDA $17    	; current map Y-pos (1)
0x03E890|$0F:$E880:85 13   	STA $13    
0x03E892|$0F:$E882:20 18 E2	JSR $E218  
0x03E895|$0F:$E885:A5 0D   	LDA $0D    
0x03E897|$0F:$E887:C5 1D   	CMP $1D    
0x03E899|$0F:$E889:D0 17   	BNE $E8A2  
0x03E89B|$0F:$E88B:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E89D|$0F:$E88D:C9 02   	CMP #$02   
0x03E89F|$0F:$E88F:D0 10   	BNE $E8A1  
0x03E8A1|$0F:$E891:A5 16   	LDA $16    	; current map X-pos (1)
0x03E8A3|$0F:$E893:4A      	LSR        
0x03E8A4|$0F:$E894:18      	CLC        
0x03E8A5|$0F:$E895:E5 21   	SBC $21    	; map width
0x03E8A7|$0F:$E897:B0 10   	BCS $E8A9  
0x03E8A9|$0F:$E899:A5 17   	LDA $17    	; current map Y-pos (1)
0x03E8AB|$0F:$E89B:4A      	LSR        
0x03E8AC|$0F:$E89C:18      	CLC        
0x03E8AD|$0F:$E89D:E5 22   	SBC $22    	; map height
0x03E8AF|$0F:$E89F:B0 08   	BCS $E8A9  
; control flow target (from $E88F)
0x03E8B1|$0F:$E8A1:60      	RTS        

; control flow target (from $E889)
0x03E8B2|$0F:$E8A2:85 1D   	STA $1D    
0x03E8B4|$0F:$E8A4:A9 FF   	LDA #$FF   
0x03E8B6|$0F:$E8A6:8D FD 05	STA $05FD  
; control flow target (from $E897, $E89F)
0x03E8B9|$0F:$E8A9:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E8BB|$0F:$E8AB:C9 02   	CMP #$02   
0x03E8BD|$0F:$E8AD:F0 03   	BEQ $E8B2  
0x03E8BF|$0F:$E8AF:4C 34 E9	JMP $E934  

; control flow target (from $E8AD)
0x03E8C2|$0F:$E8B2:20 61 F7	JSR $F761  	; load ROM bank #$06
0x03E8C5|$0F:$E8B5:A5 31   	LDA $31    	; current map ID
0x03E8C7|$0F:$E8B7:38      	SEC        
0x03E8C8|$0F:$E8B8:E9 2B   	SBC #$2B   	; only maps between #$2B and #$47 inclusive are checked for irregularities
0x03E8CA|$0F:$E8BA:0A      	ASL        
0x03E8CB|$0F:$E8BB:A8      	TAY        
0x03E8CC|$0F:$E8BC:B9 E1 A3	LDA $A3E1,Y	; pointers to warp spaces for irregularly-shaped maps
0x03E8CF|$0F:$E8BF:85 10   	STA $10    
0x03E8D1|$0F:$E8C1:B9 E2 A3	LDA $A3E2,Y
0x03E8D4|$0F:$E8C4:85 11   	STA $11    
0x03E8D6|$0F:$E8C6:05 10   	ORA $10    
0x03E8D8|$0F:$E8C8:F0 6A   	BEQ $E934  	; no irregularity => skip over handling irregularities
0x03E8DA|$0F:$E8CA:A5 16   	LDA $16    	; current map X-pos (1)
0x03E8DC|$0F:$E8CC:29 FE   	AND #$FE   	; maps are designed with 2-tile wide transitions between visible segments, so ignore the low bit of map position to cover a 2-tile-wide space
0x03E8DE|$0F:$E8CE:85 0C   	STA $0C    	; current X-pos, 2-tile granularity
0x03E8E0|$0F:$E8D0:A5 17   	LDA $17    	; current map Y-pos (1)
0x03E8E2|$0F:$E8D2:29 FE   	AND #$FE   	; maps are designed with 2-tile high transitions between visible segments, so ignore the low bit of map position to cover a 2-tile-high space
0x03E8E4|$0F:$E8D4:85 0E   	STA $0E    	; current Y-pos, 2-tile granularity
0x03E8E6|$0F:$E8D6:A0 FF   	LDY #$FF   	; initialize index to -1 so that when we INY we'll be at #$00
; control flow target (from $E8E7, $E8ED)
0x03E8E8|$0F:$E8D8:C8      	INY        	; offset for destination map ID
0x03E8E9|$0F:$E8D9:B1 10   	LDA ($10),Y	; destination map ID
0x03E8EB|$0F:$E8DB:C9 FF   	CMP #$FF   	; #$FF => end of list
0x03E8ED|$0F:$E8DD:F0 55   	BEQ $E934  
0x03E8EF|$0F:$E8DF:C8      	INY        	; offset for destination X-pos
0x03E8F0|$0F:$E8E0:C8      	INY        	; offset for destination Y-pos
0x03E8F1|$0F:$E8E1:C8      	INY        	; offset for transition X-pos
0x03E8F2|$0F:$E8E2:B1 10   	LDA ($10),Y	; transition X-pos
0x03E8F4|$0F:$E8E4:C8      	INY        
0x03E8F5|$0F:$E8E5:C5 0C   	CMP $0C    	; current X-pos, 2-tile granularity
0x03E8F7|$0F:$E8E7:D0 EF   	BNE $E8D8  	; not the right X-pos space => loop to next irregularity
0x03E8F9|$0F:$E8E9:B1 10   	LDA ($10),Y	; transition Y-pos
0x03E8FB|$0F:$E8EB:C5 0E   	CMP $0E    	; current Y-pos, 2-tile granularity
0x03E8FD|$0F:$E8ED:D0 E9   	BNE $E8D8  	; not the right X-pos space => loop to next irregularity
0x03E8FF|$0F:$E8EF:88      	DEY        	; offset for transition X-pos
0x03E900|$0F:$E8F0:88      	DEY        	; offset for destination Y-pos
0x03E901|$0F:$E8F1:A5 17   	LDA $17    	; current map Y-pos (1)
0x03E903|$0F:$E8F3:29 01   	AND #$01   	; pick out difference between real position and 2-tile granularity
0x03E905|$0F:$E8F5:11 10   	ORA ($10),Y	; set low bit of destination Y-pos
0x03E907|$0F:$E8F7:85 17   	STA $17    	; current map Y-pos (1)
0x03E909|$0F:$E8F9:85 29   	STA $29    	; current map Y-pos (2)
0x03E90B|$0F:$E8FB:85 13   	STA $13    
0x03E90D|$0F:$E8FD:85 2C   	STA $2C    	; current map Y-pos pixel, low byte
0x03E90F|$0F:$E8FF:88      	DEY        	; offset for destination X-pos
0x03E910|$0F:$E900:A5 16   	LDA $16    	; current map X-pos (1)
0x03E912|$0F:$E902:29 01   	AND #$01   	; pick out difference between real position and 2-tile granularity
0x03E914|$0F:$E904:11 10   	ORA ($10),Y	; set low bit of destination X-pos
0x03E916|$0F:$E906:85 16   	STA $16    	; current map X-pos (1)
0x03E918|$0F:$E908:85 28   	STA $28    	; current map X-pos (2)
0x03E91A|$0F:$E90A:85 12   	STA $12    
0x03E91C|$0F:$E90C:85 2A   	STA $2A    	; current map X-pos pixel, low byte
0x03E91E|$0F:$E90E:88      	DEY        	; offset for destination map ID
0x03E91F|$0F:$E90F:B1 10   	LDA ($10),Y
0x03E921|$0F:$E911:85 31   	STA $31    	; current map ID
0x03E923|$0F:$E913:A9 00   	LDA #$00   
0x03E925|$0F:$E915:85 2B   	STA $2B    	; current map X-pos pixel, high byte
0x03E927|$0F:$E917:85 2D   	STA $2D    	; current map Y-pos pixel, high byte
0x03E929|$0F:$E919:A2 04   	LDX #$04   	; shift 16x16 map position into pixel position variables
; control flow target (from $E924)
0x03E92B|$0F:$E91B:06 2A   	ASL $2A    	; current map X-pos pixel, low byte
0x03E92D|$0F:$E91D:26 2B   	ROL $2B    	; current map X-pos pixel, high byte
0x03E92F|$0F:$E91F:06 2C   	ASL $2C    	; current map Y-pos pixel, low byte
0x03E931|$0F:$E921:26 2D   	ROL $2D    	; current map Y-pos pixel, high byte
0x03E933|$0F:$E923:CA      	DEX        
0x03E934|$0F:$E924:D0 F5   	BNE $E91B  
0x03E936|$0F:$E926:A9 FF   	LDA #$FF   
0x03E938|$0F:$E928:85 45   	STA $45    
0x03E93A|$0F:$E92A:20 61 E4	JSR $E461  
0x03E93D|$0F:$E92D:20 18 E2	JSR $E218  
0x03E940|$0F:$E930:A5 0D   	LDA $0D    
0x03E942|$0F:$E932:85 1D   	STA $1D    
; control flow target (from $E8AF, $E8C8, $E8DD)
0x03E944|$0F:$E934:A9 FF   	LDA #$FF   
0x03E946|$0F:$E936:85 41   	STA $41    
; control flow target (from $D229, $D24D)
; external control flow target (from $06:$97D2)
0x03E948|$0F:$E938:A9 00   	LDA #$00   
0x03E94A|$0F:$E93A:85 18   	STA $18    
0x03E94C|$0F:$E93C:85 19   	STA $19    
0x03E94E|$0F:$E93E:85 42   	STA $42    
0x03E950|$0F:$E940:A9 FE   	LDA #$FE   
0x03E952|$0F:$E942:85 3D   	STA $3D    
0x03E954|$0F:$E944:85 3F   	STA $3F    
0x03E956|$0F:$E946:85 3E   	STA $3E    
0x03E958|$0F:$E948:85 40   	STA $40    
0x03E95A|$0F:$E94A:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03E95D|$0F:$E94D:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E95F|$0F:$E94F:0A      	ASL        
0x03E960|$0F:$E950:A8      	TAY        
0x03E961|$0F:$E951:B9 BD DE	LDA $DEBD,Y
0x03E964|$0F:$E954:85 6F   	STA $6F    
0x03E966|$0F:$E956:C8      	INY        
0x03E967|$0F:$E957:B9 BD DE	LDA $DEBD,Y
0x03E96A|$0F:$E95A:85 70   	STA $70    
0x03E96C|$0F:$E95C:A0 00   	LDY #$00   
; control flow target (from $E964)
0x03E96E|$0F:$E95E:B1 6F   	LDA ($6F),Y
0x03E970|$0F:$E960:99 00 6E	STA $6E00,Y
0x03E973|$0F:$E963:88      	DEY        
0x03E974|$0F:$E964:D0 F8   	BNE $E95E  
0x03E976|$0F:$E966:20 6D EB	JSR $EB6D  
0x03E979|$0F:$E969:20 FC E9	JSR $E9FC  
0x03E97C|$0F:$E96C:A5 41   	LDA $41    
0x03E97E|$0F:$E96E:C9 32   	CMP #$32   
0x03E980|$0F:$E970:F0 48   	BEQ $E9BA  
0x03E982|$0F:$E972:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E985|$0F:$E975:A9 FF   	LDA #$FF   
0x03E987|$0F:$E977:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03E989|$0F:$E979:20 CB D8	JSR $D8CB  
0x03E98C|$0F:$E97C:A9 00   	LDA #$00   
0x03E98E|$0F:$E97E:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03E990|$0F:$E980:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03E993|$0F:$E983:A9 F2   	LDA #$F2   
0x03E995|$0F:$E985:85 19   	STA $19    
0x03E997|$0F:$E987:A9 F0   	LDA #$F0   
0x03E999|$0F:$E989:85 18   	STA $18    
0x03E99B|$0F:$E98B:A9 02   	LDA #$02   
0x03E99D|$0F:$E98D:85 3D   	STA $3D    
0x03E99F|$0F:$E98F:85 3E   	STA $3E    
0x03E9A1|$0F:$E991:A9 0E   	LDA #$0E   
0x03E9A3|$0F:$E993:85 3F   	STA $3F    
0x03E9A5|$0F:$E995:85 40   	STA $40    
0x03E9A7|$0F:$E997:A9 00   	LDA #$00   
0x03E9A9|$0F:$E999:85 41   	STA $41    
0x03E9AB|$0F:$E99B:A2 FF   	LDX #$FF   
0x03E9AD|$0F:$E99D:8E 45 61	STX $6145  
0x03E9B0|$0F:$E9A0:20 38 EA	JSR $EA38  
0x03E9B3|$0F:$E9A3:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E9B5|$0F:$E9A5:C9 03   	CMP #$03   
0x03E9B7|$0F:$E9A7:F0 0A   	BEQ $E9B3  
0x03E9B9|$0F:$E9A9:A5 1D   	LDA $1D    
0x03E9BB|$0F:$E9AB:D0 0D   	BNE $E9BA  
0x03E9BD|$0F:$E9AD:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03E9BF|$0F:$E9AF:C9 02   	CMP #$02   
0x03E9C1|$0F:$E9B1:F0 07   	BEQ $E9BA  
; control flow target (from $E9A7)
0x03E9C3|$0F:$E9B3:A9 01   	LDA #$01   
0x03E9C5|$0F:$E9B5:85 45   	STA $45    
0x03E9C7|$0F:$E9B7:20 F7 D2	JSR $D2F7  
; control flow target (from $E970, $E9AB, $E9B1)
0x03E9CA|$0F:$E9BA:A9 EE   	LDA #$EE   
0x03E9CC|$0F:$E9BC:85 18   	STA $18    
; control flow target (from $E9F7)
0x03E9CE|$0F:$E9BE:20 6D EB	JSR $EB6D  
0x03E9D1|$0F:$E9C1:A9 F2   	LDA #$F2   
0x03E9D3|$0F:$E9C3:85 19   	STA $19    
; control flow target (from $E9D6)
0x03E9D5|$0F:$E9C5:A9 00   	LDA #$00   
0x03E9D7|$0F:$E9C7:85 1C   	STA $1C    
0x03E9D9|$0F:$E9C9:85 1E   	STA $1E    
0x03E9DB|$0F:$E9CB:20 9F EA	JSR $EA9F  
0x03E9DE|$0F:$E9CE:E6 19   	INC $19    
0x03E9E0|$0F:$E9D0:E6 19   	INC $19    
0x03E9E2|$0F:$E9D2:A5 19   	LDA $19    
0x03E9E4|$0F:$E9D4:C9 02   	CMP #$02   
0x03E9E6|$0F:$E9D6:D0 ED   	BNE $E9C5  
0x03E9E8|$0F:$E9D8:20 6D EB	JSR $EB6D  
; control flow target (from $E9EC)
0x03E9EB|$0F:$E9DB:A9 00   	LDA #$00   
0x03E9ED|$0F:$E9DD:85 1C   	STA $1C    
0x03E9EF|$0F:$E9DF:85 1E   	STA $1E    
0x03E9F1|$0F:$E9E1:20 9F EA	JSR $EA9F  
0x03E9F4|$0F:$E9E4:E6 19   	INC $19    
0x03E9F6|$0F:$E9E6:E6 19   	INC $19    
0x03E9F8|$0F:$E9E8:A5 19   	LDA $19    
0x03E9FA|$0F:$E9EA:C9 10   	CMP #$10   
0x03E9FC|$0F:$E9EC:D0 ED   	BNE $E9DB  
0x03E9FE|$0F:$E9EE:A5 18   	LDA $18    
0x03EA00|$0F:$E9F0:18      	CLC        
0x03EA01|$0F:$E9F1:69 22   	ADC #$22   
0x03EA03|$0F:$E9F3:85 18   	STA $18    
0x03EA05|$0F:$E9F5:C9 32   	CMP #$32   
0x03EA07|$0F:$E9F7:D0 C5   	BNE $E9BE  
0x03EA09|$0F:$E9F9:4C DC C1	JMP $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF

; control flow target (from $E969, $EA08, $EA6D, $EA73)
0x03EA0C|$0F:$E9FC:20 76 EA	JSR $EA76  
0x03EA0F|$0F:$E9FF:A5 18   	LDA $18    
0x03EA11|$0F:$EA01:18      	CLC        
0x03EA12|$0F:$EA02:65 3D   	ADC $3D    
0x03EA14|$0F:$EA04:85 18   	STA $18    
0x03EA16|$0F:$EA06:C5 3F   	CMP $3F    
0x03EA18|$0F:$EA08:D0 F2   	BNE $E9FC  
0x03EA1A|$0F:$EA0A:A5 3D   	LDA $3D    
0x03EA1C|$0F:$EA0C:49 FF   	EOR #$FF   
0x03EA1E|$0F:$EA0E:85 3D   	STA $3D    
0x03EA20|$0F:$EA10:E6 3D   	INC $3D    
0x03EA22|$0F:$EA12:A5 3F   	LDA $3F    
0x03EA24|$0F:$EA14:49 FF   	EOR #$FF   
0x03EA26|$0F:$EA16:85 3F   	STA $3F    
0x03EA28|$0F:$EA18:E6 3F   	INC $3F    
0x03EA2A|$0F:$EA1A:10 0B   	BPL $EA27  
0x03EA2C|$0F:$EA1C:A5 41   	LDA $41    
0x03EA2E|$0F:$EA1E:F0 0F   	BEQ $EA2F  
0x03EA30|$0F:$EA20:C6 3F   	DEC $3F    
0x03EA32|$0F:$EA22:C6 3F   	DEC $3F    
0x03EA34|$0F:$EA24:4C 2F EA	JMP $EA2F  

; control flow target (from $EA1A)
0x03EA37|$0F:$EA27:A5 41   	LDA $41    
0x03EA39|$0F:$EA29:D0 04   	BNE $EA2F  
0x03EA3B|$0F:$EA2B:C6 3F   	DEC $3F    
0x03EA3D|$0F:$EA2D:C6 3F   	DEC $3F    
; control flow target (from $EA1E, $EA24, $EA29)
0x03EA3F|$0F:$EA2F:A5 41   	LDA $41    
0x03EA41|$0F:$EA31:D0 05   	BNE $EA38  
0x03EA43|$0F:$EA33:A5 19   	LDA $19    
0x03EA45|$0F:$EA35:D0 01   	BNE $EA38  
0x03EA47|$0F:$EA37:60      	RTS        

; control flow target (from $E9A0, $EA31, $EA35, $EA44)
0x03EA48|$0F:$EA38:20 76 EA	JSR $EA76  
0x03EA4B|$0F:$EA3B:A5 19   	LDA $19    
0x03EA4D|$0F:$EA3D:18      	CLC        
0x03EA4E|$0F:$EA3E:65 3E   	ADC $3E    
0x03EA50|$0F:$EA40:85 19   	STA $19    
0x03EA52|$0F:$EA42:C5 40   	CMP $40    
0x03EA54|$0F:$EA44:D0 F2   	BNE $EA38  
0x03EA56|$0F:$EA46:A5 3E   	LDA $3E    
0x03EA58|$0F:$EA48:49 FF   	EOR #$FF   
0x03EA5A|$0F:$EA4A:85 3E   	STA $3E    
0x03EA5C|$0F:$EA4C:E6 3E   	INC $3E    
0x03EA5E|$0F:$EA4E:A5 40   	LDA $40    
0x03EA60|$0F:$EA50:49 FF   	EOR #$FF   
0x03EA62|$0F:$EA52:85 40   	STA $40    
0x03EA64|$0F:$EA54:E6 40   	INC $40    
0x03EA66|$0F:$EA56:10 0B   	BPL $EA63  
0x03EA68|$0F:$EA58:A5 41   	LDA $41    
0x03EA6A|$0F:$EA5A:F0 0F   	BEQ $EA6B  
0x03EA6C|$0F:$EA5C:C6 40   	DEC $40    
0x03EA6E|$0F:$EA5E:C6 40   	DEC $40    
0x03EA70|$0F:$EA60:4C 6B EA	JMP $EA6B  

; control flow target (from $EA56)
0x03EA73|$0F:$EA63:A5 41   	LDA $41    
0x03EA75|$0F:$EA65:D0 04   	BNE $EA6B  
0x03EA77|$0F:$EA67:C6 40   	DEC $40    
0x03EA79|$0F:$EA69:C6 40   	DEC $40    
; control flow target (from $EA5A, $EA60, $EA65)
0x03EA7B|$0F:$EA6B:A5 41   	LDA $41    
0x03EA7D|$0F:$EA6D:F0 8D   	BEQ $E9FC  
0x03EA7F|$0F:$EA6F:A5 40   	LDA $40    
0x03EA81|$0F:$EA71:C9 10   	CMP #$10   
0x03EA83|$0F:$EA73:D0 87   	BNE $E9FC  
0x03EA85|$0F:$EA75:60      	RTS        

; control flow target (from $E9FC, $EA38)
0x03EA86|$0F:$EA76:A9 00   	LDA #$00   
0x03EA88|$0F:$EA78:85 1E   	STA $1E    
0x03EA8A|$0F:$EA7A:A5 41   	LDA $41    
0x03EA8C|$0F:$EA7C:F0 04   	BEQ $EA82  
0x03EA8E|$0F:$EA7E:A9 FF   	LDA #$FF   
0x03EA90|$0F:$EA80:D0 02   	BNE $EA84  
; control flow target (from $EA7C)
0x03EA92|$0F:$EA82:A9 FE   	LDA #$FE   
; control flow target (from $EA80)
0x03EA94|$0F:$EA84:85 1C   	STA $1C    
0x03EA96|$0F:$EA86:20 9F EA	JSR $EA9F  
0x03EA99|$0F:$EA89:E6 42   	INC $42    
0x03EA9B|$0F:$EA8B:A5 42   	LDA $42    
0x03EA9D|$0F:$EA8D:C9 1E   	CMP #$1E   
0x03EA9F|$0F:$EA8F:F0 06   	BEQ $EA97  
0x03EAA1|$0F:$EA91:A5 01   	LDA $01    
0x03EAA3|$0F:$EA93:C9 12   	CMP #$12   
0x03EAA5|$0F:$EA95:90 07   	BCC $EA9E  
; control flow target (from $EA8F)
0x03EAA7|$0F:$EA97:20 6D EB	JSR $EB6D  
0x03EAAA|$0F:$EA9A:A9 00   	LDA #$00   
0x03EAAC|$0F:$EA9C:85 42   	STA $42    
; control flow target (from $EA95)
0x03EAAE|$0F:$EA9E:60      	RTS        

; control flow target (from $E9CB, $E9E1, $EA86)
0x03EAAF|$0F:$EA9F:20 FC EA	JSR $EAFC  
0x03EAB2|$0F:$EAA2:90 01   	BCC $EAA5  
0x03EAB4|$0F:$EAA4:60      	RTS        

; control flow target (from $EAA2)
0x03EAB5|$0F:$EAA5:A5 0C   	LDA $0C    
0x03EAB7|$0F:$EAA7:0A      	ASL        
0x03EAB8|$0F:$EAA8:0A      	ASL        
0x03EAB9|$0F:$EAA9:65 0C   	ADC $0C    
0x03EABB|$0F:$EAAB:A8      	TAY        
0x03EABC|$0F:$EAAC:A6 02   	LDX $02    
0x03EABE|$0F:$EAAE:A5 08   	LDA $08    
0x03EAC0|$0F:$EAB0:9D 00 03	STA $0300,X	; PPU write buffer start
0x03EAC3|$0F:$EAB3:A5 07   	LDA $07    
0x03EAC5|$0F:$EAB5:9D 01 03	STA $0301,X
0x03EAC8|$0F:$EAB8:B9 00 6E	LDA $6E00,Y
0x03EACB|$0F:$EABB:9D 02 03	STA $0302,X
0x03EACE|$0F:$EABE:B9 01 6E	LDA $6E01,Y
0x03EAD1|$0F:$EAC1:9D 03 03	STA $0303,X
0x03EAD4|$0F:$EAC4:B9 02 6E	LDA $6E02,Y
0x03EAD7|$0F:$EAC7:9D 04 03	STA $0304,X
0x03EADA|$0F:$EACA:B9 03 6E	LDA $6E03,Y
0x03EADD|$0F:$EACD:9D 05 03	STA $0305,X
0x03EAE0|$0F:$EAD0:B9 04 6E	LDA $6E04,Y
0x03EAE3|$0F:$EAD3:29 03   	AND #$03   
0x03EAE5|$0F:$EAD5:85 09   	STA $09    
0x03EAE7|$0F:$EAD7:A5 1A   	LDA $1A    
0x03EAE9|$0F:$EAD9:85 0C   	STA $0C    
0x03EAEB|$0F:$EADB:A5 1B   	LDA $1B    
0x03EAED|$0F:$EADD:85 0E   	STA $0E    
0x03EAEF|$0F:$EADF:20 6E DE	JSR $DE6E  
0x03EAF2|$0F:$EAE2:A5 08   	LDA $08    
0x03EAF4|$0F:$EAE4:09 20   	ORA #$20   
0x03EAF6|$0F:$EAE6:9D 06 03	STA $0306,X
0x03EAF9|$0F:$EAE9:A5 07   	LDA $07    
0x03EAFB|$0F:$EAEB:9D 07 03	STA $0307,X
0x03EAFE|$0F:$EAEE:A5 09   	LDA $09    
0x03EB00|$0F:$EAF0:9D 08 03	STA $0308,X
0x03EB03|$0F:$EAF3:8A      	TXA        
0x03EB04|$0F:$EAF4:18      	CLC        
0x03EB05|$0F:$EAF5:69 09   	ADC #$09   
0x03EB07|$0F:$EAF7:85 02   	STA $02    
0x03EB09|$0F:$EAF9:E6 01   	INC $01    
0x03EB0B|$0F:$EAFB:60      	RTS        

; control flow target (from $DEC5, $EA9F)
0x03EB0C|$0F:$EAFC:20 62 DF	JSR $DF62  
0x03EB0F|$0F:$EAFF:A5 0C   	LDA $0C    
0x03EB11|$0F:$EB01:85 1A   	STA $1A    
0x03EB13|$0F:$EB03:A5 0E   	LDA $0E    
0x03EB15|$0F:$EB05:85 1B   	STA $1B    
0x03EB17|$0F:$EB07:20 00 DE	JSR $DE00  
0x03EB1A|$0F:$EB0A:A5 18   	LDA $18    
0x03EB1C|$0F:$EB0C:0A      	ASL        
0x03EB1D|$0F:$EB0D:A5 18   	LDA $18    
0x03EB1F|$0F:$EB0F:6A      	ROR        
0x03EB20|$0F:$EB10:18      	CLC        
0x03EB21|$0F:$EB11:65 16   	ADC $16    	; current map X-pos (1)
0x03EB23|$0F:$EB13:85 0C   	STA $0C    
0x03EB25|$0F:$EB15:A5 19   	LDA $19    
0x03EB27|$0F:$EB17:0A      	ASL        
0x03EB28|$0F:$EB18:A5 19   	LDA $19    
0x03EB2A|$0F:$EB1A:6A      	ROR        
0x03EB2B|$0F:$EB1B:18      	CLC        
0x03EB2C|$0F:$EB1C:65 17   	ADC $17    	; current map Y-pos (1)
0x03EB2E|$0F:$EB1E:85 0E   	STA $0E    
0x03EB30|$0F:$EB20:20 89 DF	JSR $DF89  
0x03EB33|$0F:$EB23:20 22 E2	JSR $E222  
0x03EB36|$0F:$EB26:A5 1D   	LDA $1D    
0x03EB38|$0F:$EB28:C5 0D   	CMP $0D    
0x03EB3A|$0F:$EB2A:F0 22   	BEQ $EB4E  
0x03EB3C|$0F:$EB2C:A5 0C   	LDA $0C    
0x03EB3E|$0F:$EB2E:C9 28   	CMP #$28   
0x03EB40|$0F:$EB30:B0 1C   	BCS $EB4E  
0x03EB42|$0F:$EB32:A5 1D   	LDA $1D    
0x03EB44|$0F:$EB34:D0 14   	BNE $EB4A  
0x03EB46|$0F:$EB36:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03EB48|$0F:$EB38:C9 01   	CMP #$01   
0x03EB4A|$0F:$EB3A:F0 0A   	BEQ $EB46  
0x03EB4C|$0F:$EB3C:A5 0C   	LDA $0C    
0x03EB4E|$0F:$EB3E:C9 08   	CMP #$08   
0x03EB50|$0F:$EB40:90 04   	BCC $EB46  
0x03EB52|$0F:$EB42:C9 0C   	CMP #$0C   
0x03EB54|$0F:$EB44:90 08   	BCC $EB4E  
; control flow target (from $EB3A, $EB40)
0x03EB56|$0F:$EB46:A9 20   	LDA #$20   
0x03EB58|$0F:$EB48:D0 02   	BNE $EB4C  
; control flow target (from $EB34)
0x03EB5A|$0F:$EB4A:A9 24   	LDA #$24   
; control flow target (from $EB48)
0x03EB5C|$0F:$EB4C:85 0C   	STA $0C    
; control flow target (from $EB2A, $EB30, $EB44)
0x03EB5E|$0F:$EB4E:A5 1C   	LDA $1C    
0x03EB60|$0F:$EB50:C9 FF   	CMP #$FF   
0x03EB62|$0F:$EB52:D0 07   	BNE $EB5B  
0x03EB64|$0F:$EB54:A5 0C   	LDA $0C    
0x03EB66|$0F:$EB56:C9 20   	CMP #$20   
0x03EB68|$0F:$EB58:90 0D   	BCC $EB67  
0x03EB6A|$0F:$EB5A:60      	RTS        

; control flow target (from $EB52)
0x03EB6B|$0F:$EB5B:C9 FE   	CMP #$FE   
0x03EB6D|$0F:$EB5D:D0 0C   	BNE $EB6B  
0x03EB6F|$0F:$EB5F:A5 0C   	LDA $0C    
0x03EB71|$0F:$EB61:C9 20   	CMP #$20   
0x03EB73|$0F:$EB63:B0 02   	BCS $EB67  
0x03EB75|$0F:$EB65:38      	SEC        
0x03EB76|$0F:$EB66:60      	RTS        

; control flow target (from $EB58, $EB63)
0x03EB77|$0F:$EB67:A9 00   	LDA #$00   
0x03EB79|$0F:$EB69:85 1C   	STA $1C    
; control flow target (from $EB5D)
0x03EB7B|$0F:$EB6B:18      	CLC        
0x03EB7C|$0F:$EB6C:60      	RTS        

; control flow target (from $E966, $E9BE, $E9D8, $EA97)
0x03EB7D|$0F:$EB6D:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03EB80|$0F:$EB70:A9 FF   	LDA #$FF   
0x03EB82|$0F:$EB72:8D 45 61	STA $6145  
0x03EB85|$0F:$EB75:60      	RTS        

; open menu specified by next byte
; control flow target (from $C750, $C84D, $F6FC)
; external control flow target (from $02:$B29D, $06:$8061, $06:$8065, $06:$8232, $06:$8242, $06:$8374, $06:$83A3, $06:$8455, $06:$84BB, $06:$8540, $06:$855B, $06:$867D, $06:$868D, $06:$8BFC, $06:$8C29, $06:$9584, $06:$95FF, $06:$9ACB, $06:$9AD0, $06:$9B17, $06:$A0CA, $06:$A204, $06:$BB4E, $06:$BB5F, $06:$BBAB, $06:$BBCA, $06:$BC22, $06:$BD4F)
0x03EB86|$0F:$EB76:68      	PLA        	; low byte of return address
0x03EB87|$0F:$EB77:18      	CLC        
0x03EB88|$0F:$EB78:69 01   	ADC #$01   	; increment it (byte following the JSR is data)
0x03EB8A|$0F:$EB7A:85 0E   	STA $0E    	; store to $0E
0x03EB8C|$0F:$EB7C:68      	PLA        	; high byte of return address
0x03EB8D|$0F:$EB7D:69 00   	ADC #$00   	; add carry from incrementing low byte
0x03EB8F|$0F:$EB7F:85 0F   	STA $0F    	; store to $0F
0x03EB91|$0F:$EB81:48      	PHA        	; push the new return address's high byte
0x03EB92|$0F:$EB82:A5 0E   	LDA $0E    
0x03EB94|$0F:$EB84:48      	PHA        	; push the new return address's low byte
0x03EB95|$0F:$EB85:A0 00   	LDY #$00   
0x03EB97|$0F:$EB87:B1 0E   	LDA ($0E),Y	; read the byte following the original JSR
; open menu specified by A
; control flow target (from $D188, $F494, $F49B, $F4A2, $F4BE, $F514, $F521, $F526, $F531, $F53F, $F54F, $F565, $F573, $F581, $F58F, $F59D, $F5CF, $F5D8, $F5DC, $F5F0, $F60C, $F620, $F625, $F63F, $F648, $F652, $F657)
; external control flow target (from $04:$9AB1, $04:$9AC4, $06:$A997, $06:$AEAC, $06:$AEB1)
0x03EB99|$0F:$EB89:20 6E F6	JSR $F66E  	; do special effects for certain menus; sets A to menu ID
0x03EB9C|$0F:$EB8C:90 03   	BCC $EB91  	; all $F66E code paths end with SEC, so this branch is never taken
0x03EB9E|$0F:$EB8E:20 98 EB	JSR $EB98  
; control flow target (from $EB8C)
0x03EBA1|$0F:$EB91:48      	PHA        
0x03EBA2|$0F:$EB92:AD 94 00	LDA $0094  	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03EBA5|$0F:$EB95:4C 82 F7	JMP $F782  	; load bank specified by A then PLA

; control flow target (from $EB8E)
0x03EBA8|$0F:$EB98:85 59   	STA $59    	; menu ID
0x03EBAA|$0F:$EB9A:A9 01   	LDA #$01   
0x03EBAC|$0F:$EB9C:8D B4 60	STA $60B4  	; menu phase (1 = first, 0 = second)
0x03EBAF|$0F:$EB9F:20 A8 EB	JSR $EBA8  
0x03EBB2|$0F:$EBA2:20 35 F4	JSR $F435  
0x03EBB5|$0F:$EBA5:CE B4 60	DEC $60B4  	; menu phase (1 = first, 0 = second)
; control flow target (from $EB9F)
0x03EBB8|$0F:$EBA8:20 B2 EB	JSR $EBB2  	; given menu ID in $59, set $55-$56 to start of menu data
0x03EBBB|$0F:$EBAB:20 C5 EB	JSR $EBC5  	; parse menu setup header
0x03EBBE|$0F:$EBAE:20 11 EC	JSR $EC11  
0x03EBC1|$0F:$EBB1:60      	RTS        

; given menu ID in $59, set $55-$56 to start of menu data
; control flow target (from $EBA8)
0x03EBC2|$0F:$EBB2:A9 20   	LDA #$20   	; menu pointer table
0x03EBC4|$0F:$EBB4:20 E2 F3	JSR $F3E2  	; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value
0x03EBC7|$0F:$EBB7:A5 59   	LDA $59    	; menu ID
0x03EBC9|$0F:$EBB9:0A      	ASL        	; 2 bytes per pointer
0x03EBCA|$0F:$EBBA:A8      	TAY        
0x03EBCB|$0F:$EBBB:B1 57   	LDA ($57),Y	; pointer to start of main pointer table, low byte; copy menu pointer to $55-$56
0x03EBCD|$0F:$EBBD:85 55   	STA $55    	; pointer to start of sub pointer data, low byte
0x03EBCF|$0F:$EBBF:C8      	INY        
0x03EBD0|$0F:$EBC0:B1 57   	LDA ($57),Y	; pointer to start of main pointer table, low byte
0x03EBD2|$0F:$EBC2:85 56   	STA $56    	; pointer to start of sub pointer data, high byte
0x03EBD4|$0F:$EBC4:60      	RTS        

; parse menu setup header
; control flow target (from $EBAB)
0x03EBD5|$0F:$EBC5:A0 00   	LDY #$00   	; start at the start
0x03EBD7|$0F:$EBC7:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03EBD9|$0F:$EBC9:8D AA 60	STA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03EBDC|$0F:$EBCC:C8      	INY        
0x03EBDD|$0F:$EBCD:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03EBDF|$0F:$EBCF:8D A2 60	STA $60A2  	; menu window height (from ROM)
0x03EBE2|$0F:$EBD2:0A      	ASL        
0x03EBE3|$0F:$EBD3:8D A3 60	STA $60A3  	; menu window height (ROM value * 2)
0x03EBE6|$0F:$EBD6:C8      	INY        
0x03EBE7|$0F:$EBD7:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03EBE9|$0F:$EBD9:8D A1 60	STA $60A1  	; menu window width
0x03EBEC|$0F:$EBDC:C8      	INY        
0x03EBED|$0F:$EBDD:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03EBEF|$0F:$EBDF:8D A4 60	STA $60A4  	; menu window position (from ROM; X-pos = low nybble * 2, Y-pos = high nybble * 2)
0x03EBF2|$0F:$EBE2:48      	PHA        
0x03EBF3|$0F:$EBE3:29 0F   	AND #$0F   
0x03EBF5|$0F:$EBE5:0A      	ASL        
0x03EBF6|$0F:$EBE6:85 4D   	STA $4D    	; menu window X-pos
0x03EBF8|$0F:$EBE8:68      	PLA        
0x03EBF9|$0F:$EBE9:29 F0   	AND #$F0   
0x03EBFB|$0F:$EBEB:4A      	LSR        
0x03EBFC|$0F:$EBEC:4A      	LSR        
0x03EBFD|$0F:$EBED:4A      	LSR        
0x03EBFE|$0F:$EBEE:85 4E   	STA $4E    	; menu window Y-pos
0x03EC00|$0F:$EBF0:C8      	INY        
0x03EC01|$0F:$EBF1:AD AA 60	LDA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03EC04|$0F:$EBF4:10 0C   	BPL $EC02  	; if no cursor, skip ahead
0x03EC06|$0F:$EBF6:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03EC08|$0F:$EBF8:8D A5 60	STA $60A5  	; menu cursor second column X-offset (from left edge of menu)
0x03EC0B|$0F:$EBFB:C8      	INY        
0x03EC0C|$0F:$EBFC:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03EC0E|$0F:$EBFE:8D A9 60	STA $60A9  	; menu cursor initial position (from ROM; X-pos = low nybble, Y-pos = high nybble)
0x03EC11|$0F:$EC01:C8      	INY        
; control flow target (from $EBF4)
0x03EC12|$0F:$EC02:2C AA 60	BIT $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03EC15|$0F:$EC05:50 06   	BVC $EC0D  	; if menu is not linked, skip ahead
0x03EC17|$0F:$EC07:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03EC19|$0F:$EC09:8D AE 60	STA $60AE  	; menu link ID
0x03EC1C|$0F:$EC0C:C8      	INY        
; control flow target (from $EC05)
0x03EC1D|$0F:$EC0D:8C A6 60	STY $60A6  	; current menu read index
0x03EC20|$0F:$EC10:60      	RTS        

; control flow target (from $EBAE)
0x03EC21|$0F:$EC11:20 29 EC	JSR $EC29  	; initialize menu vars, remove battle item menu link if not enough items
; control flow target (from $EC23, $ECEE)
0x03EC24|$0F:$EC14:20 78 EC	JSR $EC78  	; set menu text $609B to [space] or the appropriate border tile
0x03EC27|$0F:$EC17:20 C5 EC	JSR $ECC5  	; tweak dynamic list height if necessary, otherwise set menu function index and parameter
0x03EC2A|$0F:$EC1A:20 1C ED	JSR $ED1C  	; given menu function index in $609C, set $57-$58 to corresponding function address and execute it
0x03EC2D|$0F:$EC1D:20 2B F0	JSR $F02B  
0x03EC30|$0F:$EC20:20 57 F0	JSR $F057  	; CLC if more menu rows to display, SEC otherwise
0x03EC33|$0F:$EC23:90 EF   	BCC $EC14  
0x03EC35|$0F:$EC25:20 B7 F0	JSR $F0B7  
0x03EC38|$0F:$EC28:60      	RTS        

; initialize menu vars, remove battle item menu link if not enough items
; control flow target (from $EC11)
0x03EC39|$0F:$EC29:20 C1 F0	JSR $F0C1  	; write [space] to $600B-$6046
0x03EC3C|$0F:$EC2C:A9 FF   	LDA #$FF   
0x03EC3E|$0F:$EC2E:8D B9 60	STA $60B9  
0x03EC41|$0F:$EC31:A9 00   	LDA #$00   
0x03EC43|$0F:$EC33:8D 9E 60	STA $609E  	; menu current column
0x03EC46|$0F:$EC36:8D 9F 60	STA $609F  	; menu current row
0x03EC49|$0F:$EC39:8D AC 60	STA $60AC  	; menu list index
0x03EC4C|$0F:$EC3C:8D AB 60	STA $60AB  	; which list segment we're dealing with
0x03EC4F|$0F:$EC3F:8D A8 60	STA $60A8  	; remaining number of rows for dynamic menu lists
0x03EC52|$0F:$EC42:85 10   	STA $10    
0x03EC54|$0F:$EC44:85 11   	STA $11    
0x03EC56|$0F:$EC46:85 12   	STA $12    
0x03EC58|$0F:$EC48:A5 59   	LDA $59    	; menu ID
0x03EC5A|$0F:$EC4A:C9 22   	CMP #$22   	; Menu ID #$22: Battle menu: item list window 2
0x03EC5C|$0F:$EC4C:D0 05   	BNE $EC53  
0x03EC5E|$0F:$EC4E:A9 04   	LDA #$04   
0x03EC60|$0F:$EC50:8D AC 60	STA $60AC  	; menu list index
; control flow target (from $EC4C)
0x03EC63|$0F:$EC53:A5 59   	LDA $59    	; menu ID
0x03EC65|$0F:$EC55:C9 08   	CMP #$08   	; Menu ID #$08: Battle menu: item list window 1
0x03EC67|$0F:$EC57:D0 14   	BNE $EC6D  
0x03EC69|$0F:$EC59:A9 04   	LDA #$04   	; count all items
0x03EC6B|$0F:$EC5B:8D 9D 60	STA $609D  	; menu function parameter
0x03EC6E|$0F:$EC5E:20 B7 F1	JSR $F1B7  	; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory
0x03EC71|$0F:$EC61:C9 05   	CMP #$05   	; max 4 items per screen
0x03EC73|$0F:$EC63:B0 08   	BCS $EC6D  	; if < 5 items, disable menu link
0x03EC75|$0F:$EC65:AD AA 60	LDA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03EC78|$0F:$EC68:29 BF   	AND #$BF   	; clear bit 6
0x03EC7A|$0F:$EC6A:8D AA 60	STA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
; control flow target (from $EC57, $EC63)
0x03EC7D|$0F:$EC6D:A9 00   	LDA #$00   	; write #$00 to $606B-$607A
0x03EC7F|$0F:$EC6F:A2 0F   	LDX #$0F   
; control flow target (from $EC75)
0x03EC81|$0F:$EC71:9D 6B 60	STA $606B,X
0x03EC84|$0F:$EC74:CA      	DEX        
0x03EC85|$0F:$EC75:10 FA   	BPL $EC71  
0x03EC87|$0F:$EC77:60      	RTS        

; set menu text $609B to [space] or the appropriate border tile
; control flow target (from $EC14)
0x03EC88|$0F:$EC78:A9 5F   	LDA #$5F   	; [space]
0x03EC8A|$0F:$EC7A:8D 9B 60	STA $609B  	; menu text
0x03EC8D|$0F:$EC7D:AE 9E 60	LDX $609E  	; menu current column
0x03EC90|$0F:$EC80:F0 1D   	BEQ $EC9F  	; if we're at column 0, branch to figure out what kind of left border to draw
0x03EC92|$0F:$EC82:E8      	INX        
0x03EC93|$0F:$EC83:EC A1 60	CPX $60A1  	; menu window width
0x03EC96|$0F:$EC86:D0 2E   	BNE $ECB6  	; if we're not at width - 1, branch over figuring out what kind of right border to draw
0x03EC98|$0F:$EC88:AE 9F 60	LDX $609F  	; menu current row
0x03EC9B|$0F:$EC8B:F0 0A   	BEQ $EC97  	; if we're on row 0, use a [top-right border]
0x03EC9D|$0F:$EC8D:E8      	INX        
0x03EC9E|$0F:$EC8E:EC A3 60	CPX $60A3  	; menu window height (ROM value * 2)
0x03ECA1|$0F:$EC91:F0 08   	BEQ $EC9B  	; if we're on the last row, use a [bottom-right border], otherwise we're in between, so use a plain [right border]
0x03ECA3|$0F:$EC93:A9 7B   	LDA #$7B   	; [right border]
0x03ECA5|$0F:$EC95:D0 2A   	BNE $ECC1  
; control flow target (from $EC8B)
0x03ECA7|$0F:$EC97:A9 7C   	LDA #$7C   	; [top-right border]
0x03ECA9|$0F:$EC99:D0 26   	BNE $ECC1  
; control flow target (from $EC91)
0x03ECAB|$0F:$EC9B:A9 7E   	LDA #$7E   	; [bottom-right border]
0x03ECAD|$0F:$EC9D:D0 22   	BNE $ECC1  
; control flow target (from $EC80)
0x03ECAF|$0F:$EC9F:AE 9F 60	LDX $609F  	; menu current row
0x03ECB2|$0F:$ECA2:F0 0A   	BEQ $ECAE  	; if we're on row 0, use a [top-left border]
0x03ECB4|$0F:$ECA4:E8      	INX        
0x03ECB5|$0F:$ECA5:EC A3 60	CPX $60A3  	; menu window height (ROM value * 2)
0x03ECB8|$0F:$ECA8:F0 08   	BEQ $ECB2  	; if we're on the last row, use a [bottom-left border], otherwise we're in between, so use a plain [left border]
0x03ECBA|$0F:$ECAA:A9 76   	LDA #$76   	; [left border]
0x03ECBC|$0F:$ECAC:D0 13   	BNE $ECC1  
; control flow target (from $ECA2)
0x03ECBE|$0F:$ECAE:A9 79   	LDA #$79   	; [top-left border]
0x03ECC0|$0F:$ECB0:D0 0F   	BNE $ECC1  
; control flow target (from $ECA8)
0x03ECC2|$0F:$ECB2:A9 7A   	LDA #$7A   	; [bottom-left border]
0x03ECC4|$0F:$ECB4:D0 0B   	BNE $ECC1  
; control flow target (from $EC86)
0x03ECC6|$0F:$ECB6:AE 9F 60	LDX $609F  	; menu current row
0x03ECC9|$0F:$ECB9:E8      	INX        
0x03ECCA|$0F:$ECBA:EC A3 60	CPX $60A3  	; menu window height (ROM value * 2)
0x03ECCD|$0F:$ECBD:D0 05   	BNE $ECC4  	; if we're on the last row, use a [bottom border], otherwise keep that [space] we started with
0x03ECCF|$0F:$ECBF:A9 7D   	LDA #$7D   	; [bottom border]
; control flow target (from $EC95, $EC99, $EC9D, $ECAC, $ECB0, $ECB4)
0x03ECD1|$0F:$ECC1:8D 9B 60	STA $609B  	; menu text
; control flow target (from $ECBD)
0x03ECD4|$0F:$ECC4:60      	RTS        

; tweak dynamic list height if necessary, otherwise set menu function index and parameter
; control flow target (from $EC17)
0x03ECD5|$0F:$ECC5:AD 9B 60	LDA $609B  	; menu text
0x03ECD8|$0F:$ECC8:C9 5F   	CMP #$5F   	; [space]
0x03ECDA|$0F:$ECCA:D0 4A   	BNE $ED16  	; if menu text is not a [space], set menu function index to #$10 (print one byte of menu text) and RTS
0x03ECDC|$0F:$ECCC:AD AA 60	LDA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03ECDF|$0F:$ECCF:29 20   	AND #$20   	; pick out the single-spaced bit
0x03ECE1|$0F:$ECD1:D0 22   	BNE $ECF5  	; read current menu byte and set menu function index and parameter; branch if single-spaced
0x03ECE3|$0F:$ECD3:AD 9F 60	LDA $609F  	; menu current row
0x03ECE6|$0F:$ECD6:4A      	LSR        
0x03ECE7|$0F:$ECD7:90 1C   	BCC $ECF5  	; read current menu byte and set menu function index and parameter; branch if even row
0x03ECE9|$0F:$ECD9:AD A8 60	LDA $60A8  	; remaining number of rows for dynamic menu lists
0x03ECEC|$0F:$ECDC:C9 01   	CMP #$01   
0x03ECEE|$0F:$ECDE:D0 11   	BNE $ECF1  	; set menu function index and parameter to #$00 (i.e. setup for newline function)
0x03ECF0|$0F:$ECE0:A9 00   	LDA #$00   	; reset menu current column
0x03ECF2|$0F:$ECE2:8D 9E 60	STA $609E  	; menu current column
0x03ECF5|$0F:$ECE5:AE 9F 60	LDX $609F  	; menu current row
0x03ECF8|$0F:$ECE8:E8      	INX        
0x03ECF9|$0F:$ECE9:8E A3 60	STX $60A3  	; menu window height (ROM value * 2)
0x03ECFC|$0F:$ECEC:68      	PLA        	; skip over the next few menu processing functions
0x03ECFD|$0F:$ECED:68      	PLA        
0x03ECFE|$0F:$ECEE:4C 14 EC	JMP $EC14  

; set menu function index and parameter to #$00 (i.e. setup for newline function)
; control flow target (from $ECDE)
0x03ED01|$0F:$ECF1:A9 00   	LDA #$00   
0x03ED03|$0F:$ECF3:F0 0E   	BEQ $ED03  	; split A into menu function index and parameter and save them
; read current menu byte and set menu function index and parameter
; control flow target (from $ECD1, $ECD7)
0x03ED05|$0F:$ECF5:AC A6 60	LDY $60A6  	; current menu read index
0x03ED08|$0F:$ECF8:EE A6 60	INC $60A6  	; current menu read index
0x03ED0B|$0F:$ECFB:20 FA FE	JSR $FEFA  	; increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank

; code -> data
; indirect data load target
0x03ED0E|$0F:$ECFE:20	; $01:$8000; -> $01:$B642: menu pointer table

; data -> code
0x03ED0F|$0F:$ECFF:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03ED11|$0F:$ED01:10 10   	BPL $ED13  	; high bit determines whether byte is function (set) or text (clear)
; split A into menu function index and parameter and save them
; control flow target (from $ECF3)
0x03ED13|$0F:$ED03:29 7F   	AND #$7F   	; clear function bit
0x03ED15|$0F:$ED05:48      	PHA        
0x03ED16|$0F:$ED06:29 07   	AND #$07   	; menu function parameter is 3 bits wide
0x03ED18|$0F:$ED08:8D 9D 60	STA $609D  	; menu function parameter
0x03ED1B|$0F:$ED0B:68      	PLA        
0x03ED1C|$0F:$ED0C:4A      	LSR        	; menu function index is 4 bits wide
0x03ED1D|$0F:$ED0D:4A      	LSR        
0x03ED1E|$0F:$ED0E:4A      	LSR        
0x03ED1F|$0F:$ED0F:8D 9C 60	STA $609C  	; menu function index
0x03ED22|$0F:$ED12:60      	RTS        

; control flow target (from $ED01)
0x03ED23|$0F:$ED13:8D 9B 60	STA $609B  	; menu text
; control flow target (from $ECCA)
0x03ED26|$0F:$ED16:A9 10   	LDA #$10   
0x03ED28|$0F:$ED18:8D 9C 60	STA $609C  	; menu function index
0x03ED2B|$0F:$ED1B:60      	RTS        

; given menu function index in $609C, set $57-$58 to corresponding function address and execute it
; control flow target (from $EC1A)
0x03ED2C|$0F:$ED1C:AD 9C 60	LDA $609C  	; menu function index
0x03ED2F|$0F:$ED1F:0A      	ASL        
0x03ED30|$0F:$ED20:AA      	TAX        
0x03ED31|$0F:$ED21:BD CC F0	LDA $F0CC,X	; menu control code jump table low byte
0x03ED34|$0F:$ED24:85 57   	STA $57    	; pointer to start of main pointer table, low byte
0x03ED36|$0F:$ED26:BD CD F0	LDA $F0CD,X	; menu control code jump table high byte
0x03ED39|$0F:$ED29:85 58   	STA $58    	; pointer to start of main pointer table, high byte
0x03ED3B|$0F:$ED2B:6C 57 00	JMP ($0057)	; pointer to start of main pointer table, low byte

; menu control code #$80-#$87 handler: print number of spaces specified by $609D (or rest of line if $609D is #$00) to current menu position
; control flow target (from $EF8A)
; indirect control flow target (via $F0CC)
0x03ED3E|$0F:$ED2E:A9 5F   	LDA #$5F   	; Tile ID #$5F: [space]
0x03ED40|$0F:$ED30:8D 9B 60	STA $609B  	; menu text
0x03ED43|$0F:$ED33:20 5E F0	JSR $F05E  	; set $60A0 based on menu function parameter $609D and number of remaining tiles in the current line
; control flow target (from $ED3C)
0x03ED46|$0F:$ED36:20 13 F0	JSR $F013  	; update menu current column and row
0x03ED49|$0F:$ED39:CE A0 60	DEC $60A0  	; maximum string length
0x03ED4C|$0F:$ED3C:D0 F8   	BNE $ED36  	; if more tiles to print, print them
0x03ED4E|$0F:$ED3E:60      	RTS        

; menu control code #$88-#$8F handler: print number of top border tiles specified by $609D (or rest of line if $609D is #$00) to current menu position, accounting for possible linked menu
; indirect control flow target (via $F0CE)
0x03ED4F|$0F:$ED3F:2C AA 60	BIT $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03ED52|$0F:$ED42:50 10   	BVC $ED54  	; if not linked, skip ahead
0x03ED54|$0F:$ED44:A9 5F   	LDA #$5F   	; Tile ID #$5F: [space]
0x03ED56|$0F:$ED46:8D 9B 60	STA $609B  	; menu text
0x03ED59|$0F:$ED49:20 E4 EF	JSR $EFE4  	; print one byte of menu text
0x03ED5C|$0F:$ED4C:A9 63   	LDA #$63   	; Tile ID #$63: [right arrow]
0x03ED5E|$0F:$ED4E:8D 9B 60	STA $609B  	; menu text
0x03ED61|$0F:$ED51:20 E4 EF	JSR $EFE4  	; print one byte of menu text
; control flow target (from $ED42)
0x03ED64|$0F:$ED54:A9 77   	LDA #$77   	; Tile ID #$77: [top border]
0x03ED66|$0F:$ED56:8D 9B 60	STA $609B  	; menu text
0x03ED69|$0F:$ED59:20 5E F0	JSR $F05E  	; set $60A0 based on menu function parameter $609D and number of remaining tiles in the current line
; control flow target (from $ED62)
0x03ED6C|$0F:$ED5C:20 E4 EF	JSR $EFE4  	; print one byte of menu text
0x03ED6F|$0F:$ED5F:CE A0 60	DEC $60A0  	; maximum string length
0x03ED72|$0F:$ED62:D0 F8   	BNE $ED5C  	; if more tiles to print, print them
0x03ED74|$0F:$ED64:60      	RTS        

; menu control code #$90-#$97 handler: print selected hero's current HP or MP
; indirect control flow target (via $F0D0)
0x03ED75|$0F:$ED65:A9 03   	LDA #$03   
0x03ED77|$0F:$ED67:20 7A F0	JSR $F07A  	; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D
0x03ED7A|$0F:$ED6A:A2 0E   	LDX #$0E   	; offset for current HP
0x03ED7C|$0F:$ED6C:AD 9D 60	LDA $609D  	; menu function parameter
0x03ED7F|$0F:$ED6F:29 04   	AND #$04   	; MP control codes set bit 2
0x03ED81|$0F:$ED71:F0 02   	BEQ $ED75  
0x03ED83|$0F:$ED73:A2 10   	LDX #$10   	; offset for current MP
; control flow target (from $ED71)
0x03ED85|$0F:$ED75:A0 01   	LDY #$01   	; print one byte (ignores 2nd byte of current HP)
0x03ED87|$0F:$ED77:4C 96 F0	JMP $F096  	; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces

; menu control code #$98-#$9F handler: print party gold or crests or "ADVENTURE LOG"
; indirect control flow target (via $F0D2)
0x03ED8A|$0F:$ED7A:A9 05   	LDA #$05   	; start by assuming crests
0x03ED8C|$0F:$ED7C:8D A0 60	STA $60A0  	; maximum string length
0x03ED8F|$0F:$ED7F:AD 9D 60	LDA $609D  	; menu function parameter
0x03ED92|$0F:$ED82:F0 23   	BEQ $EDA7  	; menu control code #$98 handler: print party gold
0x03ED94|$0F:$ED84:C9 01   	CMP #$01   
0x03ED96|$0F:$ED86:D0 25   	BNE $EDAD  	; menu control code #$9A-#$9F handler: print "ADVENTURE LOG"
; menu control code #$99 handler: print obtained crests
0x03ED98|$0F:$ED88:20 9F F1	JSR $F19F  	; initialize string buffer $0100-$010C with [space]s
0x03ED9B|$0F:$ED8B:AD 12 01	LDA $0112  	; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun)
0x03ED9E|$0F:$ED8E:29 1F   	AND #$1F   	; pretty sure nothing writes to the high 3 bits, but better safe than sorry
0x03EDA0|$0F:$ED90:85 10   	STA $10    	; crests found
0x03EDA2|$0F:$ED92:A2 04   	LDX #$04   	; maximum of 5 crests
0x03EDA4|$0F:$ED94:A0 5A   	LDY #$5A   	; Tile ID #$5A: [sun]
; control flow target (from $EDA2)
0x03EDA6|$0F:$ED96:46 10   	LSR $10    	; shift crest bit into C
0x03EDA8|$0F:$ED98:90 05   	BCC $ED9F  	; branch if crest not found
0x03EDAA|$0F:$ED9A:98      	TYA        
0x03EDAB|$0F:$ED9B:9D 00 01	STA $0100,X	; string copy buffer start (often referenced as $00FF,X)
0x03EDAE|$0F:$ED9E:CA      	DEX        
; control flow target (from $ED98)
0x03EDAF|$0F:$ED9F:C8      	INY        	; crest tile ID
0x03EDB0|$0F:$EDA0:A5 10   	LDA $10    	; remaining crests
0x03EDB2|$0F:$EDA2:D0 F2   	BNE $ED96  	; if more crests to copy, copy them
0x03EDB4|$0F:$EDA4:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$98 handler: print party gold
; control flow target (from $ED82)
0x03EDB7|$0F:$EDA7:20 79 F4	JSR $F479  	; print party gold to $0100 in decimal in reverse, replacing leading (now trailing) zeroes with spaces, leaving X at most significant digit
0x03EDBA|$0F:$EDAA:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$9A-#$9F handler: print "ADVENTURE LOG"
; 9B-9F are unused
; control flow target (from $ED86)
0x03EDBD|$0F:$EDAD:A9 0D   	LDA #$0D   	; length of "ADVENTRUE LOG"
0x03EDBF|$0F:$EDAF:8D A0 60	STA $60A0  	; maximum string length
0x03EDC2|$0F:$EDB2:AA      	TAX        
; control flow target (from $EDBA)
0x03EDC3|$0F:$EDB3:BD BE ED	LDA $EDBE,X	; built-in offset from $EDBF: "GOL ERUTNEVDA", i.e. "ADVENTRUE LOG" backwards
0x03EDC6|$0F:$EDB6:9D FF 00	STA $00FF,X	; built-in offset from string copy buffer start at $0100
0x03EDC9|$0F:$EDB9:CA      	DEX        
0x03EDCA|$0F:$EDBA:D0 F7   	BNE $EDB3  
0x03EDCC|$0F:$EDBC:4C A5
; built-in offset from $EDBF: "GOL ERUTNEVDA", i.e. "ADVENTRUE LOG" backwards
; indexed data load target (from $EDB3)
0x03EDCE|$0F:$EDBE:      F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position


; code -> data
; "GOL ERUTNEVDA", i.e. "ADVENTRUE LOG" backwards
0x03EDCF|$0F:$EDBF:2A 32 2F 5F 28 35 38 37 31 28 39 27 24

; data -> code
; menu control code #$A0-#$A7 handler: print level of selected hero or Midenhall's level in current save file
; indirect control flow target (via $F0D4)
0x03EDDC|$0F:$EDCC:AD 9D 60	LDA $609D  	; menu function parameter
0x03EDDF|$0F:$EDCF:C9 04   	CMP #$04   
0x03EDE1|$0F:$EDD1:F0 2E   	BEQ $EE01  	; menu control code #$A4 handler: print Midenhall's level in current save file
0x03EDE3|$0F:$EDD3:A9 02   	LDA #$02   
0x03EDE5|$0F:$EDD5:20 7A F0	JSR $F07A  	; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D
0x03EDE8|$0F:$EDD8:A2 00   	LDX #$00   	; offset for hero status
0x03EDEA|$0F:$EDDA:A0 01   	LDY #$01   	; which is one byte long
0x03EDEC|$0F:$EDDC:20 4A F1	JSR $F14A  	; given stat offset in X and stat byte size in Y (max of #$03), copy that many bytes of hero ID $609D's stats to $10-$12
0x03EDEF|$0F:$EDDF:A5 10   	LDA $10    	; hero status
0x03EDF1|$0F:$EDE1:10 0B   	BPL $EDEE  	; dead hero
0x03EDF3|$0F:$EDE3:29 20   	AND #$20   	; pick out the poison bit
0x03EDF5|$0F:$EDE5:D0 0D   	BNE $EDF4  	; poisoned hero
0x03EDF7|$0F:$EDE7:A2 11   	LDX #$11   	; offset for level
0x03EDF9|$0F:$EDE9:A0 01   	LDY #$01   	; which is one byte long
0x03EDFB|$0F:$EDEB:4C 96 F0	JMP $F096  	; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces

; dead hero
; control flow target (from $EDE1)
0x03EDFE|$0F:$EDEE:A9 27   	LDA #$27   	; Tile ID #$27: D
0x03EE00|$0F:$EDF0:A2 28   	LDX #$28   	; Tile ID #$28: E
0x03EE02|$0F:$EDF2:D0 04   	BNE $EDF8  
; poisoned hero
; control flow target (from $EDE5)
0x03EE04|$0F:$EDF4:A9 33   	LDA #$33   	; Tile ID #$33: P
0x03EE06|$0F:$EDF6:A2 32   	LDX #$32   	; Tile ID #$32: O
; control flow target (from $EDF2)
0x03EE08|$0F:$EDF8:8D 01 01	STA $0101  
0x03EE0B|$0F:$EDFB:8E 00 01	STX $0100  	; string copy buffer start (often referenced as $00FF,X)
0x03EE0E|$0F:$EDFE:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$A4 handler: print Midenhall's level in current save file
; control flow target (from $EDD1)
0x03EE11|$0F:$EE01:A9 02   	LDA #$02   
0x03EE13|$0F:$EE03:8D A0 60	STA $60A0  	; maximum string length
0x03EE16|$0F:$EE06:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03EE19|$0F:$EE09:C6	; $06:$800C; -> $06:$A8AA: given current game save slot in $75DB, return Midenhall's level in that save game in A/$0E

; data -> code
0x03EE1A|$0F:$EE0A:A5 0E   	LDA $0E    	; useless op
0x03EE1C|$0F:$EE0C:85 10   	STA $10    
0x03EE1E|$0F:$EE0E:A9 00   	LDA #$00   
0x03EE20|$0F:$EE10:85 11   	STA $11    	; this is either useless if we're relying on $11 still being #$00 from the earlier call to $EC29 or a bug since we aren't setting $12
0x03EE22|$0F:$EE12:20 9F F0	JSR $F09F  	; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces
0x03EE25|$0F:$EE15:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$A8-#$AF handler: print selected hero's current EXP
; indirect control flow target (via $F0D6)
0x03EE28|$0F:$EE18:A9 07   	LDA #$07   
0x03EE2A|$0F:$EE1A:20 7A F0	JSR $F07A  	; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D
0x03EE2D|$0F:$EE1D:A2 06   	LDX #$06   	; offset for current EXP
0x03EE2F|$0F:$EE1F:A0 03   	LDY #$03   	; which is 3 bytes long
0x03EE31|$0F:$EE21:4C 96 F0	JMP $F096  	; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces

; menu control code #$B0-#$B7 handler: print selected hero's short name, current hero's full name, or Midenhall's short name from selected save game
; indirect control flow target (via $F0D8)
0x03EE34|$0F:$EE24:AD 9D 60	LDA $609D  	; menu function parameter
0x03EE37|$0F:$EE27:C9 04   	CMP #$04   
0x03EE39|$0F:$EE29:F0 22   	BEQ $EE4D  	; menu control code #$B4 handler: print current hero's full name
0x03EE3B|$0F:$EE2B:C9 05   	CMP #$05   
0x03EE3D|$0F:$EE2D:B0 41   	BCS $EE70  	; menu control code #$B5-#$B7 handler: print short save name
; menu control code #$B0-#$B3 handler: print short name of hero ID in $609D
; control flow target (from $EE52)
0x03EE3F|$0F:$EE2F:A9 04   	LDA #$04   
0x03EE41|$0F:$EE31:20 7A F0	JSR $F07A  	; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D; for #$B3, set hero ID = $4A
0x03EE44|$0F:$EE34:AD 9D 60	LDA $609D  	; menu function parameter
0x03EE47|$0F:$EE37:0A      	ASL        
0x03EE48|$0F:$EE38:0A      	ASL        
0x03EE49|$0F:$EE39:6D 9D 60	ADC $609D  	; menu function parameter; A = hero ID * 5
0x03EE4C|$0F:$EE3C:AA      	TAX        
0x03EE4D|$0F:$EE3D:AC A0 60	LDY $60A0  	; maximum string length
; control flow target (from $EE48)
0x03EE50|$0F:$EE40:BD 13 01	LDA $0113,X	; Midenhall name bytes 0-3 + terminator
0x03EE53|$0F:$EE43:99 FF 00	STA $00FF,Y	; built-in offset from string copy buffer start at $0100
0x03EE56|$0F:$EE46:E8      	INX        	; read index
0x03EE57|$0F:$EE47:88      	DEY        	; write index
0x03EE58|$0F:$EE48:D0 F6   	BNE $EE40  	; if more tiles to print, print them
0x03EE5A|$0F:$EE4A:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$B4 handler: print current hero's full name
; control flow target (from $EE29)
0x03EE5D|$0F:$EE4D:A9 03   	LDA #$03   	; start by printing selected hero's short name
0x03EE5F|$0F:$EE4F:8D 9D 60	STA $609D  	; menu function parameter
0x03EE62|$0F:$EE52:20 2F EE	JSR $EE2F  	; menu control code #$B0-#$B3 handler: print short name of hero ID in $609D
0x03EE65|$0F:$EE55:A9 04   	LDA #$04   
0x03EE67|$0F:$EE57:8D A0 60	STA $60A0  	; maximum string length
0x03EE6A|$0F:$EE5A:AD 9D 60	LDA $609D  	; menu function parameter
0x03EE6D|$0F:$EE5D:0A      	ASL        
0x03EE6E|$0F:$EE5E:0A      	ASL        
0x03EE6F|$0F:$EE5F:AA      	TAX        	; A = hero ID * 4
0x03EE70|$0F:$EE60:AC A0 60	LDY $60A0  	; maximum string length
; control flow target (from $EE6B)
0x03EE73|$0F:$EE63:BD 86 01	LDA $0186,X	; Midenhall name bytes 4-7
0x03EE76|$0F:$EE66:99 FF 00	STA $00FF,Y	; built-in offset from string copy buffer start at $0100
0x03EE79|$0F:$EE69:E8      	INX        	; read index
0x03EE7A|$0F:$EE6A:88      	DEY        	; write index
0x03EE7B|$0F:$EE6B:D0 F6   	BNE $EE63  	; if more tiles to print, print them
0x03EE7D|$0F:$EE6D:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$B5-#$B7 handler: print short save name
; control flow target (from $EE2D)
0x03EE80|$0F:$EE70:A9 04   	LDA #$04   
0x03EE82|$0F:$EE72:8D A0 60	STA $60A0  	; maximum string length
0x03EE85|$0F:$EE75:AD 9D 60	LDA $609D  	; menu function parameter
0x03EE88|$0F:$EE78:38      	SEC        
0x03EE89|$0F:$EE79:E9 05   	SBC #$05   	; #$05-#$07 -> #$00-#$02
0x03EE8B|$0F:$EE7B:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03EE8E|$0F:$EE7E:CE	; $06:$801C; -> $06:$A88F: copy Midenhall's short name from save slot in A to $0100 in reverse

; data -> code
0x03EE8F|$0F:$EE7F:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$B8-#$BF handler: print various item names based on menu format
; indirect control flow target (via $F0DA)
0x03EE92|$0F:$EE82:A9 0D   	LDA #$0D   
0x03EE94|$0F:$EE84:8D A0 60	STA $60A0  	; maximum string length
0x03EE97|$0F:$EE87:AD AA 60	LDA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03EE9A|$0F:$EE8A:29 02   	AND #$02   
0x03EE9C|$0F:$EE8C:F0 05   	BEQ $EE93  	; if this menu only displays equipped items (i.e. it's Menu ID #$1C: Main menu: status screen equipped items), set menu list index $60AC = #$00
0x03EE9E|$0F:$EE8E:A9 00   	LDA #$00   
0x03EEA0|$0F:$EE90:8D AC 60	STA $60AC  	; menu list index
; control flow target (from $EE8C)
0x03EEA3|$0F:$EE93:AD 9D 60	LDA $609D  	; menu function parameter
0x03EEA6|$0F:$EE96:C9 05   	CMP #$05   
0x03EEA8|$0F:$EE98:B0 0C   	BCS $EEA6  	; menu control code #$BD-#$BF handler: given shop ID in $60AF and menu list index in $60AC, print name of the corresponding item ID or #$00 if it's the Jailor's Key to $0100; depending on settings, possibly update menu's [left border] to [left border, equipped], then toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC
0x03EEAA|$0F:$EE9A:20 19 F2	JSR $F219  	; return the $60AC'th item of item type $609D in A and the party inventory index of that item in X, or #$00 in A and #$FF in X if no such item exists; also sets $60BA,X to #$FF if found and #$00 otherwise
0x03EEAD|$0F:$EE9D:20 9D F2	JSR $F29D  	; given party inventory offset in X, print name of that item ID to $0100 in reverse; depending on settings, possibly update menu's [left border] to [left border, equipped]
; print string at $0100 in reverse to current menu position and toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC
; control flow target (from $EEAC)
0x03EEB0|$0F:$EEA0:20 A5 F0	JSR $F0A5  	; print string at $0100 in reverse to current menu position
0x03EEB3|$0F:$EEA3:4C 21 F3	JMP $F321  	; toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC

; menu control code #$BD-#$BF handler: given shop ID in $60AF and menu list index in $60AC, print name of the corresponding item ID or #$00 if it's the Jailor's Key to $0100; depending on settings, possibly update menu's [left border] to [left border, equipped], then toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC
; control flow target (from $EE98)
0x03EEB6|$0F:$EEA6:20 7F F2	JSR $F27F  	; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID or #$00 if it's the Jailor's Key
0x03EEB9|$0F:$EEA9:20 A7 F2	JSR $F2A7  	; print name of item ID in A to $0100 in reverse; depending on settings, possibly update menu's [left border] to [left border, equipped]
0x03EEBC|$0F:$EEAC:4C A0 EE	JMP $EEA0  	; print string at $0100 in reverse to current menu position and toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC

; menu control code #$C0-#$C7 handler: draw spell name stuff
; indirect control flow target (via $F0DC)
0x03EEBF|$0F:$EEAF:A9 09   	LDA #$09   
0x03EEC1|$0F:$EEB1:8D A0 60	STA $60A0  	; maximum string length
0x03EEC4|$0F:$EEB4:20 35 F3	JSR $F335  
0x03EEC7|$0F:$EEB7:20 9F F3	JSR $F39F  	; given spell name index in A, print spell name to $0100 in reverse, set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2)
0x03EECA|$0F:$EEBA:20 A5 F0	JSR $F0A5  	; print string at $0100 in reverse to current menu position
0x03EECD|$0F:$EEBD:EE AC 60	INC $60AC  	; menu list index
0x03EED0|$0F:$EEC0:60      	RTS        

; menu control code #$C8-#$CF handler: draw item price stuff
; indirect control flow target (via $F0DE)
0x03EED1|$0F:$EEC1:20 9F F1	JSR $F19F  	; initialize string buffer $0100-$010C with [space]s
0x03EED4|$0F:$EEC4:A9 05   	LDA #$05   
0x03EED6|$0F:$EEC6:8D A0 60	STA $60A0  	; maximum string length
0x03EED9|$0F:$EEC9:20 61 F7	JSR $F761  	; load ROM bank #$06
0x03EEDC|$0F:$EECC:AD AD 60	LDA $60AD  	; item ID
0x03EEDF|$0F:$EECF:F0 13   	BEQ $EEE4  
0x03EEE1|$0F:$EED1:0A      	ASL        
0x03EEE2|$0F:$EED2:AA      	TAX        
0x03EEE3|$0F:$EED3:BD FC 9F	LDA $9FFC,X	; Item Prices, low byte
0x03EEE6|$0F:$EED6:85 10   	STA $10    
0x03EEE8|$0F:$EED8:BD FD 9F	LDA $9FFD,X	; Item Prices, high byte
0x03EEEB|$0F:$EEDB:85 11   	STA $11    
0x03EEED|$0F:$EEDD:A9 00   	LDA #$00   
0x03EEEF|$0F:$EEDF:85 12   	STA $12    
0x03EEF1|$0F:$EEE1:20 9F F0	JSR $F09F  	; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces
; control flow target (from $EECF)
0x03EEF4|$0F:$EEE4:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$D0-#$D7 handler: start lists
; indirect control flow target (via $F0E0)
0x03EEF7|$0F:$EEE7:AD 9D 60	LDA $609D  	; menu function parameter
0x03EEFA|$0F:$EEEA:C9 06   	CMP #$06   
0x03EEFC|$0F:$EEEC:F0 25   	BEQ $EF13  	; menu control code #$D6 handler: start field spell list
0x03EEFE|$0F:$EEEE:C9 07   	CMP #$07   
0x03EF00|$0F:$EEF0:F0 33   	BEQ $EF25  	; menu control code #$D7 handler: start monster list
0x03EF02|$0F:$EEF2:C9 05   	CMP #$05   
0x03EF04|$0F:$EEF4:D0 06   	BNE $EEFC  	; menu control code #$D0-#$D4 handler: start item lists
; menu control code #$D5 handler: start shop item list
0x03EF06|$0F:$EEF6:20 55 F2	JSR $F255  	; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID and X to the number of items in the shop
0x03EF09|$0F:$EEF9:8A      	TXA        
0x03EF0A|$0F:$EEFA:D0 0D   	BNE $EF09  	; set remaining number of rows for dynamic menu lists to A, set menu read index for start of repeating lists to current menu read index
; menu control code #$D0-#$D4 handler: start item lists
; control flow target (from $EEF4)
0x03EF0C|$0F:$EEFC:A9 00   	LDA #$00   
0x03EF0E|$0F:$EEFE:8D AC 60	STA $60AC  	; menu list index
0x03EF11|$0F:$EF01:A9 00   	LDA #$00   
0x03EF13|$0F:$EF03:8D AB 60	STA $60AB  	; which list segment we're dealing with
0x03EF16|$0F:$EF06:20 B7 F1	JSR $F1B7  	; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory
; set remaining number of rows for dynamic menu lists to A, set menu read index for start of repeating lists to current menu read index
; control flow target (from $EEFA, $EF22, $EF34)
0x03EF19|$0F:$EF09:8D A8 60	STA $60A8  	; remaining number of rows for dynamic menu lists
0x03EF1C|$0F:$EF0C:AD A6 60	LDA $60A6  	; current menu read index
0x03EF1F|$0F:$EF0F:8D A7 60	STA $60A7  	; menu read index for start of repeating lists
0x03EF22|$0F:$EF12:60      	RTS        

; menu control code #$D6 handler: start field spell list
; control flow target (from $EEEC)
0x03EF23|$0F:$EF13:A0 00   	LDY #$00   	; number of learned spells
0x03EF25|$0F:$EF15:A6 4A   	LDX $4A    	; hero ID
0x03EF27|$0F:$EF17:BD 1A 06	LDA $061A,X	; Cannock's learned field spell list
; control flow target (from $EF1F)
0x03EF2A|$0F:$EF1A:0A      	ASL        
0x03EF2B|$0F:$EF1B:90 02   	BCC $EF1F  	; branch if spell not learned
0x03EF2D|$0F:$EF1D:C8      	INY        	; number of learned spells
0x03EF2E|$0F:$EF1E:AA      	TAX        	; set Z (updated by INY) back to A
; control flow target (from $EF1B)
0x03EF2F|$0F:$EF1F:D0 F9   	BNE $EF1A  
0x03EF31|$0F:$EF21:98      	TYA        	; number of learned spells
0x03EF32|$0F:$EF22:4C 09 EF	JMP $EF09  	; set remaining number of rows for dynamic menu lists to A, set menu read index for start of repeating lists to current menu read index

; menu control code #$D7 handler: start monster list
; control flow target (from $EEF0)
0x03EF35|$0F:$EF25:A2 00   	LDX #$00   	; number of monster groups
; control flow target (from $EF30)
0x03EF37|$0F:$EF27:BD 1C 06	LDA $061C,X	; monster group 1 monster ID
0x03EF3A|$0F:$EF2A:F0 06   	BEQ $EF32  
0x03EF3C|$0F:$EF2C:E8      	INX        	; this part of monster group data is 2 bytes each
0x03EF3D|$0F:$EF2D:E8      	INX        
0x03EF3E|$0F:$EF2E:E0 08   	CPX #$08   	; maximum 4 groups * 2 bytes each = 8 bytes
0x03EF40|$0F:$EF30:D0 F5   	BNE $EF27  
; control flow target (from $EF2A)
0x03EF42|$0F:$EF32:8A      	TXA        
0x03EF43|$0F:$EF33:4A      	LSR        	; 2 bytes per group, so divide by 2
0x03EF44|$0F:$EF34:4C 09 EF	JMP $EF09  	; set remaining number of rows for dynamic menu lists to A, set menu read index for start of repeating lists to current menu read index

; menu control code #$E8-#$EF handler: repeat/end list and full save name handlers
; indirect control flow target (via $F0E6)
0x03EF47|$0F:$EF37:AD 9D 60	LDA $609D  	; menu function parameter
0x03EF4A|$0F:$EF3A:C9 02   	CMP #$02   
0x03EF4C|$0F:$EF3C:F0 15   	BEQ $EF53  	; menu control code #$EA handler: print Midenhall's full name from save slot in $75DB
0x03EF4E|$0F:$EF3E:29 03   	AND #$03   
0x03EF50|$0F:$EF40:D0 1D   	BNE $EF5F  	; menu control code #$E9 handler: end current repeating list
; menu control code #$E8 handler: update remaining number of rows for dynamic menu lists, reset current menu read index if applicable
0x03EF52|$0F:$EF42:AD A8 60	LDA $60A8  	; remaining number of rows for dynamic menu lists
0x03EF55|$0F:$EF45:F0 0B   	BEQ $EF52  
0x03EF57|$0F:$EF47:CE A8 60	DEC $60A8  	; remaining number of rows for dynamic menu lists
0x03EF5A|$0F:$EF4A:F0 06   	BEQ $EF52  
0x03EF5C|$0F:$EF4C:AD A7 60	LDA $60A7  	; menu read index for start of repeating lists
0x03EF5F|$0F:$EF4F:8D A6 60	STA $60A6  	; current menu read index
; control flow target (from $EF45, $EF4A)
0x03EF62|$0F:$EF52:60      	RTS        

; menu control code #$EA handler: print Midenhall's full name from save slot in $75DB
; control flow target (from $EF3C)
0x03EF63|$0F:$EF53:A9 08   	LDA #$08   
0x03EF65|$0F:$EF55:8D A0 60	STA $60A0  	; maximum string length
0x03EF68|$0F:$EF58:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03EF6B|$0F:$EF5B:C5	; $06:$800A; -> $06:$A896: copy Midenhall's full name from save slot in $75DB to $0100 in reverse

; data -> code
0x03EF6C|$0F:$EF5C:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$E9 handler: end current repeating list
; control flow target (from $EF40)
0x03EF6F|$0F:$EF5F:A9 00   	LDA #$00   
0x03EF71|$0F:$EF61:8D 9E 60	STA $609E  	; menu current column
0x03EF74|$0F:$EF64:8D 9D 60	STA $609D  	; menu function parameter
0x03EF77|$0F:$EF67:AD 9F 60	LDA $609F  	; menu current row
0x03EF7A|$0F:$EF6A:29 01   	AND #$01   
0x03EF7C|$0F:$EF6C:49 01   	EOR #$01   
0x03EF7E|$0F:$EF6E:18      	CLC        
0x03EF7F|$0F:$EF6F:69 01   	ADC #$01   
0x03EF81|$0F:$EF71:6D 9F 60	ADC $609F  	; menu current row
0x03EF84|$0F:$EF74:8D A3 60	STA $60A3  	; menu window height (ROM value * 2); height = number of rows + 1 if odd, + 2 if even
0x03EF87|$0F:$EF77:4A      	LSR        
0x03EF88|$0F:$EF78:8D A2 60	STA $60A2  	; menu window height (from ROM)
0x03EF8B|$0F:$EF7B:AD 9F 60	LDA $609F  	; menu current row
0x03EF8E|$0F:$EF7E:29 01   	AND #$01   
0x03EF90|$0F:$EF80:D0 0B   	BNE $EF8D  
0x03EF92|$0F:$EF82:A9 76   	LDA #$76   	; Tile ID #$76: [left border]
0x03EF94|$0F:$EF84:8D 9B 60	STA $609B  	; menu text
0x03EF97|$0F:$EF87:20 E4 EF	JSR $EFE4  	; print one byte of menu text
0x03EF9A|$0F:$EF8A:4C 2E ED	JMP $ED2E  	; menu control code #$80-#$87 handler: print number of spaces specified by $609D (or rest of line if $609D is #$00) to current menu position

; control flow target (from $EF80)
0x03EF9D|$0F:$EF8D:60      	RTS        

; menu control code #$D8-#$DF handler: print selected stat
; indirect control flow target (via $F0E2)
0x03EF9E|$0F:$EF8E:AE 9D 60	LDX $609D  	; menu function parameter
0x03EFA1|$0F:$EF91:BD EE F0	LDA $F0EE,X	; stat offsets
0x03EFA4|$0F:$EF94:48      	PHA        	; stat offset
0x03EFA5|$0F:$EF95:A9 03   	LDA #$03   
0x03EFA7|$0F:$EF97:8D 9D 60	STA $609D  	; menu function parameter
0x03EFAA|$0F:$EF9A:20 7A F0	JSR $F07A  	; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D
0x03EFAD|$0F:$EF9D:68      	PLA        	; stat offset
0x03EFAE|$0F:$EF9E:AA      	TAX        	; stat offset
0x03EFAF|$0F:$EF9F:A0 01   	LDY #$01   	; number of bytes
0x03EFB1|$0F:$EFA1:4C 96 F0	JMP $F096  	; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces

; menu control code #$E0-#$E7 handler: draw monster text stuff
; indirect control flow target (via $F0E4)
0x03EFB4|$0F:$EFA4:AD 9D 60	LDA $609D  	; menu function parameter
0x03EFB7|$0F:$EFA7:D0 23   	BNE $EFCC  
0x03EFB9|$0F:$EFA9:A9 0B   	LDA #$0B   
0x03EFBB|$0F:$EFAB:8D A0 60	STA $60A0  	; maximum string length
0x03EFBE|$0F:$EFAE:AD AB 60	LDA $60AB  	; which list segment we're dealing with
0x03EFC1|$0F:$EFB1:4A      	LSR        
0x03EFC2|$0F:$EFB2:90 05   	BCC $EFB9  
0x03EFC4|$0F:$EFB4:A9 09   	LDA #$09   
0x03EFC6|$0F:$EFB6:8D A0 60	STA $60A0  	; maximum string length
; control flow target (from $EFB2)
0x03EFC9|$0F:$EFB9:AD AC 60	LDA $60AC  	; menu list index
0x03EFCC|$0F:$EFBC:0A      	ASL        
0x03EFCD|$0F:$EFBD:AA      	TAX        
0x03EFCE|$0F:$EFBE:BD 1C 06	LDA $061C,X	; monster group 1 monster ID
0x03EFD1|$0F:$EFC1:A2 00   	LDX #$00   
0x03EFD3|$0F:$EFC3:20 B7 F3	JSR $F3B7  	; given monster ID in A, copy monster name segment to $0100 in reverse
0x03EFD6|$0F:$EFC6:20 A5 F0	JSR $F0A5  	; print string at $0100 in reverse to current menu position
0x03EFD9|$0F:$EFC9:4C 21 F3	JMP $F321  	; toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC

; control flow target (from $EFA7)
0x03EFDC|$0F:$EFCC:A9 01   	LDA #$01   
0x03EFDE|$0F:$EFCE:8D A0 60	STA $60A0  	; maximum string length
0x03EFE1|$0F:$EFD1:AD AC 60	LDA $60AC  	; menu list index
0x03EFE4|$0F:$EFD4:0A      	ASL        
0x03EFE5|$0F:$EFD5:AA      	TAX        
0x03EFE6|$0F:$EFD6:BD 1D 06	LDA $061D,X	; monster group 1 monster count
0x03EFE9|$0F:$EFD9:85 10   	STA $10    
0x03EFEB|$0F:$EFDB:20 7C F1	JSR $F17C  	; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0
0x03EFEE|$0F:$EFDE:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; menu control code #$F0-#$FF + text handler: print one byte of menu text to current position
; indirect control flow target (via $F0E8, $F0EA, $F0EC)
0x03EFF1|$0F:$EFE1:4C E4 EF	JMP $EFE4  	; print one byte of menu text

; print one byte of menu text
; control flow target (from $ED49, $ED51, $ED5C, $EF87, $EFE1, $F0AE, $F332)
0x03EFF4|$0F:$EFE4:AD B4 60	LDA $60B4  	; menu phase (1 = first, 0 = second)
0x03EFF7|$0F:$EFE7:D0 2A   	BNE $F013  	; update menu current column and row; if it's first phase, skip ahead
0x03EFF9|$0F:$EFE9:AD 9F 60	LDA $609F  	; menu current row
0x03EFFC|$0F:$EFEC:29 01   	AND #$01   
0x03EFFE|$0F:$EFEE:F0 03   	BEQ $EFF3  
0x03F000|$0F:$EFF0:AD A1 60	LDA $60A1  	; menu window width
; control flow target (from $EFEE)
0x03F003|$0F:$EFF3:18      	CLC        
0x03F004|$0F:$EFF4:6D 9E 60	ADC $609E  	; menu current column
0x03F007|$0F:$EFF7:AA      	TAX        
0x03F008|$0F:$EFF8:AD 9B 60	LDA $609B  	; menu text
0x03F00B|$0F:$EFFB:9D 0B 60	STA $600B,X
0x03F00E|$0F:$EFFE:C9 76   	CMP #$76   	; [left border]
0x03F010|$0F:$F000:B0 11   	BCS $F013  	; update menu current column and row
0x03F012|$0F:$F002:BD 0A 60	LDA $600A,X
0x03F015|$0F:$F005:C9 77   	CMP #$77   	; [top border]
0x03F017|$0F:$F007:D0 0A   	BNE $F013  	; update menu current column and row
0x03F019|$0F:$F009:AD 9E 60	LDA $609E  	; menu current column
0x03F01C|$0F:$F00C:F0 05   	BEQ $F013  	; update menu current column and row
0x03F01E|$0F:$F00E:A9 78   	LDA #$78   	; [top border short]
0x03F020|$0F:$F010:9D 0A 60	STA $600A,X
; update menu current column and row
; control flow target (from $ED36, $EFE7, $F000, $F007, $F00C)
0x03F023|$0F:$F013:EE 9E 60	INC $609E  	; menu current column
0x03F026|$0F:$F016:AD 9E 60	LDA $609E  	; menu current column
0x03F029|$0F:$F019:CD A1 60	CMP $60A1  	; menu window width
0x03F02C|$0F:$F01C:90 0C   	BCC $F02A  	; if current column < window width, nothing else to do here
0x03F02E|$0F:$F01E:A2 01   	LDX #$01   	; otherwise set string length to #$01 (for the left border of the next row)
0x03F030|$0F:$F020:8E A0 60	STX $60A0  	; maximum string length
0x03F033|$0F:$F023:CA      	DEX        	; and reset the current column to #$00
0x03F034|$0F:$F024:8E 9E 60	STX $609E  	; menu current column
0x03F037|$0F:$F027:EE 9F 60	INC $609F  	; menu current row
; control flow target (from $F01C)
0x03F03A|$0F:$F02A:60      	RTS        

; control flow target (from $EC1D)
0x03F03B|$0F:$F02B:AD 9F 60	LDA $609F  	; menu current row
0x03F03E|$0F:$F02E:29 01   	AND #$01   
0x03F040|$0F:$F030:0D 9E 60	ORA $609E  	; menu current column
0x03F043|$0F:$F033:D0 21   	BNE $F056  
0x03F045|$0F:$F035:AD B4 60	LDA $60B4  	; menu phase (1 = first, 0 = second)
0x03F048|$0F:$F038:D0 1C   	BNE $F056  
0x03F04A|$0F:$F03A:AD A1 60	LDA $60A1  	; menu window width
0x03F04D|$0F:$F03D:4A      	LSR        
0x03F04E|$0F:$F03E:09 10   	ORA #$10   
0x03F050|$0F:$F040:8D 7B 60	STA $607B  
0x03F053|$0F:$F043:AD A4 60	LDA $60A4  	; menu window position (from ROM; X-pos = low nybble * 2, Y-pos = high nybble * 2)
0x03F056|$0F:$F046:8D 7C 60	STA $607C  
0x03F059|$0F:$F049:18      	CLC        
0x03F05A|$0F:$F04A:69 10   	ADC #$10   
0x03F05C|$0F:$F04C:8D A4 60	STA $60A4  	; menu window position (from ROM; X-pos = low nybble * 2, Y-pos = high nybble * 2)
0x03F05F|$0F:$F04F:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03F062|$0F:$F052:C0	; $06:$8000

; data -> code
0x03F063|$0F:$F053:20 C1 F0	JSR $F0C1  	; write [space] to $600B-$6046
; control flow target (from $F033, $F038)
0x03F066|$0F:$F056:60      	RTS        

; CLC if more menu rows to display, SEC otherwise
; control flow target (from $EC20)
0x03F067|$0F:$F057:AD 9F 60	LDA $609F  	; menu current row
0x03F06A|$0F:$F05A:CD A3 60	CMP $60A3  	; menu window height (ROM value * 2)
0x03F06D|$0F:$F05D:60      	RTS        

; set $60A0 based on menu function parameter $609D and number of remaining tiles in the current line
; control flow target (from $ED33, $ED59)
0x03F06E|$0F:$F05E:AD 9D 60	LDA $609D  	; menu function parameter
0x03F071|$0F:$F061:D0 02   	BNE $F065  	; control codes #$80 and #$88 fill out the rest of the line, so default length to #$FF
0x03F073|$0F:$F063:A9 FF   	LDA #$FF   
; control flow target (from $F061)
0x03F075|$0F:$F065:8D A0 60	STA $60A0  	; maximum string length
0x03F078|$0F:$F068:18      	CLC        
0x03F079|$0F:$F069:AD A1 60	LDA $60A1  	; menu window width
0x03F07C|$0F:$F06C:ED 9E 60	SBC $609E  	; menu current column
0x03F07F|$0F:$F06F:90 08   	BCC $F079  	; branch if we're already done this line
0x03F081|$0F:$F071:CD A0 60	CMP $60A0  	; maximum string length
0x03F084|$0F:$F074:B0 03   	BCS $F079  	; if number of tiles remaining is less than string length, update string length
0x03F086|$0F:$F076:8D A0 60	STA $60A0  	; maximum string length
; control flow target (from $F06F, $F074)
0x03F089|$0F:$F079:60      	RTS        

; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D
; control flow target (from $ED67, $EDD5, $EE1A, $EE31, $EF9A)
0x03F08A|$0F:$F07A:8D A0 60	STA $60A0  	; maximum string length
0x03F08D|$0F:$F07D:AD 9D 60	LDA $609D  	; menu function parameter
0x03F090|$0F:$F080:48      	PHA        
0x03F091|$0F:$F081:29 03   	AND #$03   
0x03F093|$0F:$F083:C9 03   	CMP #$03   
0x03F095|$0F:$F085:D0 02   	BNE $F089  
0x03F097|$0F:$F087:A5 4A   	LDA $4A    
; control flow target (from $F085)
0x03F099|$0F:$F089:8D 9D 60	STA $609D  	; menu function parameter
0x03F09C|$0F:$F08C:68      	PLA        
0x03F09D|$0F:$F08D:29 04   	AND #$04   
0x03F09F|$0F:$F08F:0D 9D 60	ORA $609D  	; menu function parameter
0x03F0A2|$0F:$F092:8D 9D 60	STA $609D  	; menu function parameter
0x03F0A5|$0F:$F095:60      	RTS        

; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces
; control flow target (from $ED77, $EDEB, $EE21, $EFA1)
0x03F0A6|$0F:$F096:20 9C F0	JSR $F09C  	; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat's base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces
0x03F0A9|$0F:$F099:4C A5 F0	JMP $F0A5  	; print string at $0100 in reverse to current menu position

; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat's base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces
; control flow target (from $F096)
0x03F0AC|$0F:$F09C:20 4A F1	JSR $F14A  	; given stat offset in X and stat byte size in Y (max of #$03), copy that many bytes of hero ID $609D's stats to $10-$12
; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces
; control flow target (from $EE12, $EEE1)
0x03F0AF|$0F:$F09F:20 7C F1	JSR $F17C  	; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0
0x03F0B2|$0F:$F0A2:4C 8D F1	JMP $F18D  	; scan through $0100 + maximum string length $60A0 in reverse, replacing zeroes with spaces until the first non-zero or $0100 is reached; leaves X at most significant digit

; print string at $0100 in reverse to current menu position
; control flow target (from $EDA4, $EDAA, $EDBC, $EDFE, $EE15, $EE4A, $EE6D, $EE7F, $EEA0, $EEBA, $EEE4, $EF5C, $EFC6, $EFDE, $F099, $F0B4)
0x03F0B5|$0F:$F0A5:AE A0 60	LDX $60A0  	; maximum string length
0x03F0B8|$0F:$F0A8:BD FF 00	LDA $00FF,X	; built-in offset from string copy buffer start at $0100
0x03F0BB|$0F:$F0AB:8D 9B 60	STA $609B  	; menu text
0x03F0BE|$0F:$F0AE:20 E4 EF	JSR $EFE4  	; print one byte of menu text
0x03F0C1|$0F:$F0B1:CE A0 60	DEC $60A0  	; maximum string length
0x03F0C4|$0F:$F0B4:D0 EF   	BNE $F0A5  	; print string at $0100 in reverse to current menu position
0x03F0C6|$0F:$F0B6:60      	RTS        

; control flow target (from $EC25)
0x03F0C7|$0F:$F0B7:AD AA 60	LDA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03F0CA|$0F:$F0BA:10 04   	BPL $F0C0  
0x03F0CC|$0F:$F0BC:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03F0CF|$0F:$F0BF:CC	; $06:$8018

; data -> code
; control flow target (from $F0BA)
0x03F0D0|$0F:$F0C0:60      	RTS        

; write [space] to $600B-$6046
; control flow target (from $EC29, $F053)
0x03F0D1|$0F:$F0C1:A9 5F   	LDA #$5F   
0x03F0D3|$0F:$F0C3:A2 3B   	LDX #$3B   
; control flow target (from $F0C9)
0x03F0D5|$0F:$F0C5:9D 0B 60	STA $600B,X
0x03F0D8|$0F:$F0C8:CA      	DEX        
0x03F0D9|$0F:$F0C9:10 FA   	BPL $F0C5  
0x03F0DB|$0F:$F0CB:60      	RTS        


; code -> data
; menu control code jump table low byte
; indexed data load target (from $ED21)
0x03F0DC|$0F:$F0CC:2E
; menu control code jump table high byte
; indexed data load target (from $ED26)
0x03F0DD|$0F:$F0CD:   ED	; $0F:$ED2E; menu control code #$80-#$87 handler: print number of spaces specified by $609D (or rest of line if $609D is #$00) to current menu position
0x03F0DE|$0F:$F0CE:3F ED	; $0F:$ED3F; menu control code #$88-#$8F handler: print number of top border tiles specified by $609D (or rest of line if $609D is #$00) to current menu position, accounting for possible linked menu
0x03F0E0|$0F:$F0D0:65 ED	; $0F:$ED65; menu control code #$90-#$97 handler: print selected hero's current HP or MP
0x03F0E2|$0F:$F0D2:7A ED	; $0F:$ED7A; menu control code #$98-#$9F handler: print party gold or crests or "ADVENTURE LOG"
0x03F0E4|$0F:$F0D4:CC ED	; $0F:$EDCC; menu control code #$A0-#$A7 handler: print level of selected hero or Midenhall's level in current save file
0x03F0E6|$0F:$F0D6:18 EE	; $0F:$EE18; menu control code #$A8-#$AF handler: print selected hero's current EXP
0x03F0E8|$0F:$F0D8:24 EE	; $0F:$EE24; menu control code #$B0-#$B7 handler: print selected hero's short name, current hero's full name, or Midenhall's short name from selected save game
0x03F0EA|$0F:$F0DA:82 EE	; $0F:$EE82; menu control code #$B8-#$BF handler: print various item names based on menu format
0x03F0EC|$0F:$F0DC:AF EE	; $0F:$EEAF; menu control code #$C0-#$C7 handler: draw spell name stuff
0x03F0EE|$0F:$F0DE:C1 EE	; $0F:$EEC1; menu control code #$C8-#$CF handler: draw item price stuff
0x03F0F0|$0F:$F0E0:E7 EE	; $0F:$EEE7; menu control code #$D0-#$D7 handler: start lists
0x03F0F2|$0F:$F0E2:8E EF	; $0F:$EF8E; menu control code #$D8-#$DF handler: print selected stat
0x03F0F4|$0F:$F0E4:A4 EF	; $0F:$EFA4; menu control code #$E0-#$E7 handler: draw monster text stuff
0x03F0F6|$0F:$F0E6:37 EF	; $0F:$EF37; menu control code #$E8-#$EF handler: repeat/end list and full save name handlers
0x03F0F8|$0F:$F0E8:E1 EF	; $0F:$EFE1; menu control code #$F0-#$FF + text handler: print one byte of menu text to current position
0x03F0FA|$0F:$F0EA:E1 EF	; $0F:$EFE1; menu control code #$F0-#$FF + text handler: print one byte of menu text to current position
0x03F0FC|$0F:$F0EC:E1 EF	; $0F:$EFE1; menu control code #$F0-#$FF + text handler: print one byte of menu text to current position
; stat offsets
; indexed data load target (from $EF91)
0x03F0FE|$0F:$F0EE:09	; Strength
0x03F0FF|$0F:$F0EF:0A	; Agility
0x03F100|$0F:$F0F0:0B	; Attack Power
0x03F101|$0F:$F0F1:0C	; Defence Power
0x03F102|$0F:$F0F2:03	; Max HP, low byte
0x03F103|$0F:$F0F3:05	; Max MP

; data -> code
; 16-bit multiplication: set 16-bit ($00,X-$01,X) = ($00,X-$01,X) * A
; control flow target (from $FDAC)
; external control flow target (from $06:$B2A8)
0x03F104|$0F:$F0F4:8D 84 60	STA $6084  
0x03F107|$0F:$F0F7:A9 00   	LDA #$00   
0x03F109|$0F:$F0F9:8D 85 60	STA $6085  
0x03F10C|$0F:$F0FC:8D 86 60	STA $6086  
; control flow target (from $F11C)
0x03F10F|$0F:$F0FF:4E 84 60	LSR $6084  
0x03F112|$0F:$F102:90 11   	BCC $F115  
0x03F114|$0F:$F104:B5 00   	LDA $00,X  
0x03F116|$0F:$F106:18      	CLC        
0x03F117|$0F:$F107:6D 85 60	ADC $6085  
0x03F11A|$0F:$F10A:8D 85 60	STA $6085  
0x03F11D|$0F:$F10D:B5 01   	LDA $01,X  
0x03F11F|$0F:$F10F:6D 86 60	ADC $6086  
0x03F122|$0F:$F112:8D 86 60	STA $6086  
; control flow target (from $F102)
0x03F125|$0F:$F115:16 00   	ASL $00,X  
0x03F127|$0F:$F117:36 01   	ROL $01,X  
0x03F129|$0F:$F119:AD 84 60	LDA $6084  
0x03F12C|$0F:$F11C:D0 E1   	BNE $F0FF  
0x03F12E|$0F:$F11E:AD 85 60	LDA $6085  
0x03F131|$0F:$F121:95 00   	STA $00,X  
0x03F133|$0F:$F123:AD 86 60	LDA $6086  
0x03F136|$0F:$F126:95 01   	STA $01,X  
0x03F138|$0F:$F128:60      	RTS        

; given a 24-bit number N in $10-$12, set $10-$12 to quotient of N / 10 and $13 to the remainder of N / 10, i.e. for base 10 N, $13 = the low digit, $10-$12 = the high digits
; control flow target (from $F17E)
0x03F139|$0F:$F129:8A      	TXA        	; save X on the stack
0x03F13A|$0F:$F12A:48      	PHA        
0x03F13B|$0F:$F12B:A9 00   	LDA #$00   
0x03F13D|$0F:$F12D:85 13   	STA $13    	; initialize remainder to #$00
0x03F13F|$0F:$F12F:A2 18   	LDX #$18   	; we're wokring with 24-bit input
; control flow target (from $F145)
0x03F141|$0F:$F131:06 10   	ASL $10    	; ASL 24-bit value into $13
0x03F143|$0F:$F133:26 11   	ROL $11    
0x03F145|$0F:$F135:26 12   	ROL $12    
0x03F147|$0F:$F137:26 13   	ROL $13    
0x03F149|$0F:$F139:38      	SEC        
0x03F14A|$0F:$F13A:A5 13   	LDA $13    
0x03F14C|$0F:$F13C:E9 0A   	SBC #$0A   	; converting to base 10
0x03F14E|$0F:$F13E:90 04   	BCC $F144  	; if remainder < 10, nothing else to do
0x03F150|$0F:$F140:85 13   	STA $13    	; reduce remainder by 10
0x03F152|$0F:$F142:E6 10   	INC $10    	; set quotient bit for next call to $F129
; control flow target (from $F13E)
0x03F154|$0F:$F144:CA      	DEX        
0x03F155|$0F:$F145:D0 EA   	BNE $F131  	; keep looping until we've gone through all 24 original bits
0x03F157|$0F:$F147:68      	PLA        	; restore X from the stack
0x03F158|$0F:$F148:AA      	TAX        
0x03F159|$0F:$F149:60      	RTS        

; given stat offset in X and stat byte size in Y (max of #$03), copy that many bytes of hero ID $609D's stats to $10-$12
; control flow target (from $EDDC, $F09C)
0x03F15A|$0F:$F14A:86 10   	STX $10    
0x03F15C|$0F:$F14C:8C 84 60	STY $6084  
0x03F15F|$0F:$F14F:A9 00   	LDA #$00   	; useless op
0x03F161|$0F:$F151:AD 9D 60	LDA $609D  	; menu function parameter
0x03F164|$0F:$F154:29 03   	AND #$03   	; hero ID
0x03F166|$0F:$F156:AA      	TAX        
0x03F167|$0F:$F157:F0 08   	BEQ $F161  	; if Midenhall, no need to adjust offsets
0x03F169|$0F:$F159:A9 00   	LDA #$00   	; update offset into hero data based on hero ID
; control flow target (from $F15F)
0x03F16B|$0F:$F15B:18      	CLC        
0x03F16C|$0F:$F15C:69 12   	ADC #$12   	; hero data is #$12 bytes each
0x03F16E|$0F:$F15E:CA      	DEX        
0x03F16F|$0F:$F15F:D0 FA   	BNE $F15B  
; control flow target (from $F157)
0x03F171|$0F:$F161:18      	CLC        
0x03F172|$0F:$F162:65 10   	ADC $10    	; desired stat offset
0x03F174|$0F:$F164:AA      	TAX        
0x03F175|$0F:$F165:A9 00   	LDA #$00   	; initialize $10-$12 and Y to #$00
0x03F177|$0F:$F167:85 10   	STA $10    
0x03F179|$0F:$F169:85 11   	STA $11    
0x03F17B|$0F:$F16B:85 12   	STA $12    
0x03F17D|$0F:$F16D:A8      	TAY        
; control flow target (from $F179)
0x03F17E|$0F:$F16E:BD 2D 06	LDA $062D,X	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03F181|$0F:$F171:99 10 00	STA $0010,Y
0x03F184|$0F:$F174:E8      	INX        
0x03F185|$0F:$F175:C8      	INY        
0x03F186|$0F:$F176:CC 84 60	CPY $6084  
0x03F189|$0F:$F179:D0 F3   	BNE $F16E  
0x03F18B|$0F:$F17B:60      	RTS        

; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0
; control flow target (from $EFDB, $F09F, $F48C)
; external control flow target (from $02:$BE4A)
0x03F18C|$0F:$F17C:A0 00   	LDY #$00   
; control flow target (from $F18A)
0x03F18E|$0F:$F17E:20 29 F1	JSR $F129  	; given a 24-bit number N in $10-$12, set $10-$12 to quotient of N / 10 and $13 to the remainder of N / 10, i.e. for base 10 N, $13 = the low digit, $10-$12 = the high digits
0x03F191|$0F:$F181:A5 13   	LDA $13    	; remainder
0x03F193|$0F:$F183:99 00 01	STA $0100,Y	; string copy buffer start (often referenced as $00FF,X)
0x03F196|$0F:$F186:C8      	INY        
0x03F197|$0F:$F187:CC A0 60	CPY $60A0  	; maximum string length
0x03F19A|$0F:$F18A:D0 F2   	BNE $F17E  	; if more digits to print, keep printing
0x03F19C|$0F:$F18C:60      	RTS        

; scan through $0100 + maximum string length $60A0 in reverse, replacing zeroes with spaces until the first non-zero or $0100 is reached; leaves X at most significant digit
; control flow target (from $F0A2, $F48F)
; external control flow target (from $02:$BE4D)
0x03F19D|$0F:$F18D:AE A0 60	LDX $60A0  	; maximum string length
0x03F1A0|$0F:$F190:CA      	DEX        
; control flow target (from $F19C)
0x03F1A1|$0F:$F191:BD 00 01	LDA $0100,X	; string copy buffer start (often referenced as $00FF,X)
0x03F1A4|$0F:$F194:D0 08   	BNE $F19E  
0x03F1A6|$0F:$F196:A9 5F   	LDA #$5F   
0x03F1A8|$0F:$F198:9D 00 01	STA $0100,X	; string copy buffer start (often referenced as $00FF,X)
0x03F1AB|$0F:$F19B:CA      	DEX        
0x03F1AC|$0F:$F19C:D0 F3   	BNE $F191  
; control flow target (from $F194)
0x03F1AE|$0F:$F19E:60      	RTS        

; initialize string buffer $0100-$010C with [space]s
; control flow target (from $ED88, $EEC1, $F2F0, $F3A0, $F3D7)
0x03F1AF|$0F:$F19F:48      	PHA        
0x03F1B0|$0F:$F1A0:8A      	TXA        
0x03F1B1|$0F:$F1A1:48      	PHA        
0x03F1B2|$0F:$F1A2:A2 0C   	LDX #$0C   
0x03F1B4|$0F:$F1A4:A9 5F   	LDA #$5F   	; [space]
; control flow target (from $F1AA)
0x03F1B6|$0F:$F1A6:9D 00 01	STA $0100,X	; string copy buffer start (often referenced as $00FF,X)
0x03F1B9|$0F:$F1A9:CA      	DEX        
0x03F1BA|$0F:$F1AA:10 FA   	BPL $F1A6  
0x03F1BC|$0F:$F1AC:68      	PLA        
0x03F1BD|$0F:$F1AD:AA      	TAX        
0x03F1BE|$0F:$F1AE:68      	PLA        
0x03F1BF|$0F:$F1AF:60      	RTS        

; given a hero ID in $4A, set A and X to hero ID * 8, a.k.a. offset for start of hero's inventory
; control flow target (from $F1B7, $F22D)
; external control flow target (from $06:$AE05)
0x03F1C0|$0F:$F1B0:A5 4A   	LDA $4A    
0x03F1C2|$0F:$F1B2:0A      	ASL        
0x03F1C3|$0F:$F1B3:0A      	ASL        
0x03F1C4|$0F:$F1B4:0A      	ASL        
0x03F1C5|$0F:$F1B5:AA      	TAX        
0x03F1C6|$0F:$F1B6:60      	RTS        

; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory
; control flow target (from $EC5E, $EF06, $F4B7, $F5C3, $F605)
0x03F1C7|$0F:$F1B7:20 B0 F1	JSR $F1B0  	; given a hero ID in $4A, set A and X to hero ID * 8, a.k.a. offset for start of hero's inventory
0x03F1CA|$0F:$F1BA:A0 00   	LDY #$00   
0x03F1CC|$0F:$F1BC:84 10   	STY $10    	; number of items in hero's inventory
; control flow target (from $F1D1)
0x03F1CE|$0F:$F1BE:BD 00 06	LDA $0600,X	; Midenhall inventory item 1 (| #$40 if equipped)
0x03F1D1|$0F:$F1C1:F0 0A   	BEQ $F1CD  	; branch if no item
0x03F1D3|$0F:$F1C3:20 D6 F1	JSR $F1D6  	; determine item type (#$00 = weapon, #$01 = armour, #$02 = shield, #$03 = helmet, #$04 = menu function wants all items or item is non-equipment, #$05 = menu format wants equipped items only and item not equipped)
0x03F1D6|$0F:$F1C6:CD 9D 60	CMP $609D  	; menu function parameter
0x03F1D9|$0F:$F1C9:D0 02   	BNE $F1CD  	; branch if wrong type of item
0x03F1DB|$0F:$F1CB:E6 10   	INC $10    	; number of items of desired type in hero's inventory
; control flow target (from $F1C1, $F1C9)
0x03F1DD|$0F:$F1CD:E8      	INX        	; increment total inventory offset
0x03F1DE|$0F:$F1CE:C8      	INY        	; increment hero inventory offset
0x03F1DF|$0F:$F1CF:C0 08   	CPY #$08   	; 8 inventory slots per hero
0x03F1E1|$0F:$F1D1:D0 EB   	BNE $F1BE  	; if more inventory to check, check it
0x03F1E3|$0F:$F1D3:A5 10   	LDA $10    	; number of items of desired type in hero's inventory
0x03F1E5|$0F:$F1D5:60      	RTS        

; determine item type (#$00 = weapon, #$01 = armour, #$02 = shield, #$03 = helmet, #$04 = menu function wants all items or item is non-equipment, #$05 = menu format wants equipped items only and item not equipped)
; control flow target (from $F1C3, $F235)
; external control flow target (from $06:$AE10)
0x03F1E6|$0F:$F1D6:48      	PHA        	; item ID
0x03F1E7|$0F:$F1D7:AD AA 60	LDA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03F1EA|$0F:$F1DA:29 02   	AND #$02   
0x03F1EC|$0F:$F1DC:F0 06   	BEQ $F1E4  
0x03F1EE|$0F:$F1DE:68      	PLA        	; item ID
0x03F1EF|$0F:$F1DF:48      	PHA        	; item ID
0x03F1F0|$0F:$F1E0:29 40   	AND #$40   	; #$40 => equipped
0x03F1F2|$0F:$F1E2:F0 21   	BEQ $F205  	; item is not equipped
; control flow target (from $F1DC)
0x03F1F4|$0F:$F1E4:AD 9D 60	LDA $609D  	; menu function parameter
0x03F1F7|$0F:$F1E7:C9 04   	CMP #$04   	; #$04 => count all items as non-equipment
0x03F1F9|$0F:$F1E9:F0 2A   	BEQ $F215  	; item is non-equipment
0x03F1FB|$0F:$F1EB:68      	PLA        	; item ID
0x03F1FC|$0F:$F1EC:29 3F   	AND #$3F   	; strip off equipped bit
0x03F1FE|$0F:$F1EE:C9 00   	CMP #$00   	; no item
0x03F200|$0F:$F1F0:F0 24   	BEQ $F216  
0x03F202|$0F:$F1F2:C9 11   	CMP #$11   	; first armour ID
0x03F204|$0F:$F1F4:90 13   	BCC $F209  	; item is a weapon
0x03F206|$0F:$F1F6:C9 1C   	CMP #$1C   	; first shield ID
0x03F208|$0F:$F1F8:90 12   	BCC $F20C  	; item is an armour
0x03F20A|$0F:$F1FA:C9 21   	CMP #$21   	; first helmet ID
0x03F20C|$0F:$F1FC:90 11   	BCC $F20F  	; item is a shield
0x03F20E|$0F:$F1FE:C9 24   	CMP #$24   	; first non-equipment item ID
0x03F210|$0F:$F200:90 10   	BCC $F212  	; item is a helmet
0x03F212|$0F:$F202:A9 04   	LDA #$04   	; item is non-equipment
0x03F214|$0F:$F204:60      	RTS        

; item is not equipped
; control flow target (from $F1E2)
0x03F215|$0F:$F205:68      	PLA        
0x03F216|$0F:$F206:A9 05   	LDA #$05   
0x03F218|$0F:$F208:60      	RTS        

; item is a weapon
; control flow target (from $F1F4)
0x03F219|$0F:$F209:A9 00   	LDA #$00   
0x03F21B|$0F:$F20B:60      	RTS        

; item is an armour
; control flow target (from $F1F8)
0x03F21C|$0F:$F20C:A9 01   	LDA #$01   
0x03F21E|$0F:$F20E:60      	RTS        

; item is a shield
; control flow target (from $F1FC)
0x03F21F|$0F:$F20F:A9 02   	LDA #$02   
0x03F221|$0F:$F211:60      	RTS        

; item is a helmet
; control flow target (from $F200)
0x03F222|$0F:$F212:A9 03   	LDA #$03   
0x03F224|$0F:$F214:60      	RTS        

; item is non-equipment
; control flow target (from $F1E9)
0x03F225|$0F:$F215:68      	PLA        
; control flow target (from $F1F0)
0x03F226|$0F:$F216:A9 04   	LDA #$04   
0x03F228|$0F:$F218:60      	RTS        

; return the $60AC'th item of item type $609D in A and the party inventory index of that item in X, or #$00 in A and #$FF in X if no such item exists; also sets $60BA,X to #$FF if found and #$00 otherwise
; control flow target (from $EE9A)
0x03F229|$0F:$F219:AD AC 60	LDA $60AC  	; menu list index
0x03F22C|$0F:$F21C:29 03   	AND #$03   
0x03F22E|$0F:$F21E:AA      	TAX        
0x03F22F|$0F:$F21F:A9 FF   	LDA #$FF   
0x03F231|$0F:$F221:9D BA 60	STA $60BA,X
0x03F234|$0F:$F224:AD AC 60	LDA $60AC  	; menu list index
0x03F237|$0F:$F227:29 07   	AND #$07   
0x03F239|$0F:$F229:85 10   	STA $10    
0x03F23B|$0F:$F22B:E6 10   	INC $10    
0x03F23D|$0F:$F22D:20 B0 F1	JSR $F1B0  	; given a hero ID in $4A, set A and X to hero ID * 8, a.k.a. offset for start of hero's inventory
; control flow target (from $F245)
0x03F240|$0F:$F230:BD 00 06	LDA $0600,X	; Midenhall inventory item 1 (| #$40 if equipped)
0x03F243|$0F:$F233:F0 12   	BEQ $F247  
0x03F245|$0F:$F235:20 D6 F1	JSR $F1D6  	; determine item type (#$00 = weapon, #$01 = armour, #$02 = shield, #$03 = helmet, #$04 = menu function wants all items or item is non-equipment, #$05 = menu format wants equipped items only and item not equipped)
0x03F248|$0F:$F238:CD 9D 60	CMP $609D  	; menu function parameter
0x03F24B|$0F:$F23B:D0 04   	BNE $F241  
0x03F24D|$0F:$F23D:C6 10   	DEC $10    
0x03F24F|$0F:$F23F:F0 13   	BEQ $F254  
; control flow target (from $F23B)
0x03F251|$0F:$F241:E8      	INX        
0x03F252|$0F:$F242:8A      	TXA        
0x03F253|$0F:$F243:29 07   	AND #$07   
0x03F255|$0F:$F245:D0 E9   	BNE $F230  
; control flow target (from $F233)
0x03F257|$0F:$F247:AD AC 60	LDA $60AC  	; menu list index
0x03F25A|$0F:$F24A:29 03   	AND #$03   
0x03F25C|$0F:$F24C:AA      	TAX        
0x03F25D|$0F:$F24D:A9 00   	LDA #$00   
0x03F25F|$0F:$F24F:9D BA 60	STA $60BA,X
0x03F262|$0F:$F252:A2 FF   	LDX #$FF   
; control flow target (from $F23F)
0x03F264|$0F:$F254:60      	RTS        

; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID and X to the number of items in the shop
; control flow target (from $EEF6)
0x03F265|$0F:$F255:20 61 F7	JSR $F761  	; load ROM bank #$06
0x03F268|$0F:$F258:AD AF 60	LDA $60AF  	; shop ID
0x03F26B|$0F:$F25B:0A      	ASL        
0x03F26C|$0F:$F25C:85 10   	STA $10    
0x03F26E|$0F:$F25E:0A      	ASL        
0x03F26F|$0F:$F25F:65 10   	ADC $10    	; A = A * 6; 6 items per shop
0x03F271|$0F:$F261:A8      	TAY        
0x03F272|$0F:$F262:84 10   	STY $10    	; start of shop's inventory list
0x03F274|$0F:$F264:A2 00   	LDX #$00   	; number of items in shop
; control flow target (from $F26F)
0x03F276|$0F:$F266:B9 8A 9F	LDA $9F8A,Y	; Weapon Shop inventories
0x03F279|$0F:$F269:F0 06   	BEQ $F271  	; #$00 marks the end of shop's item list
0x03F27B|$0F:$F26B:E8      	INX        
0x03F27C|$0F:$F26C:C8      	INY        
0x03F27D|$0F:$F26D:E0 06   	CPX #$06   	; 6 items per shop
0x03F27F|$0F:$F26F:D0 F5   	BNE $F266  	; if more items to check, check them
; control flow target (from $F269)
0x03F281|$0F:$F271:AD AC 60	LDA $60AC  	; menu list index
0x03F284|$0F:$F274:18      	CLC        
0x03F285|$0F:$F275:65 10   	ADC $10    	; start of shop's inventory list
0x03F287|$0F:$F277:A8      	TAY        	; selected item
0x03F288|$0F:$F278:B9 8A 9F	LDA $9F8A,Y	; Weapon Shop inventories
0x03F28B|$0F:$F27B:60      	RTS        

; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID
; control flow target (from $F62F)
0x03F28C|$0F:$F27C:4C 89 F2	JMP $F289  	; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID

; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID or #$00 if it's the Jailor's Key
; control flow target (from $EEA6)
0x03F28F|$0F:$F27F:20 89 F2	JSR $F289  	; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID
0x03F292|$0F:$F282:C9 39   	CMP #$39   	; Item ID #$39: Jailor’s Key
0x03F294|$0F:$F284:D0 02   	BNE $F288  	; if Jailor's Key, display [blank] instead
0x03F296|$0F:$F286:A9 00   	LDA #$00   
; control flow target (from $F284)
0x03F298|$0F:$F288:60      	RTS        

; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID
; control flow target (from $F27C, $F27F)
0x03F299|$0F:$F289:20 61 F7	JSR $F761  	; load ROM bank #$06
0x03F29C|$0F:$F28C:AD AF 60	LDA $60AF  	; shop ID
0x03F29F|$0F:$F28F:0A      	ASL        
0x03F2A0|$0F:$F290:85 10   	STA $10    
0x03F2A2|$0F:$F292:0A      	ASL        
0x03F2A3|$0F:$F293:65 10   	ADC $10    	; A = A * 6; 6 items per shop
0x03F2A5|$0F:$F295:6D AC 60	ADC $60AC  	; menu list index
0x03F2A8|$0F:$F298:AA      	TAX        
0x03F2A9|$0F:$F299:BD 8A 9F	LDA $9F8A,X	; Weapon Shop inventories
0x03F2AC|$0F:$F29C:60      	RTS        

; given party inventory offset in X, print name of that item ID to $0100 in reverse; depending on settings, possibly update menu's [left border] to [left border, equipped]
; control flow target (from $EE9D)
0x03F2AD|$0F:$F29D:20 F0 F2	JSR $F2F0  	; initialize string buffer $0100-$010C with [space]s, set maximum string length to #$0B if we're dealing with the second segment
0x03F2B0|$0F:$F2A0:E0 FF   	CPX #$FF   
0x03F2B2|$0F:$F2A2:F0 4B   	BEQ $F2EF  
0x03F2B4|$0F:$F2A4:BD 00 06	LDA $0600,X	; Midenhall inventory item 1 (| #$40 if equipped)
; print name of item ID in A to $0100 in reverse; depending on settings, possibly update menu's [left border] to [left border, equipped]
; control flow target (from $EEA9)
; external control flow target (from $02:$BE95)
0x03F2B7|$0F:$F2A7:8D AD 60	STA $60AD  	; item ID
0x03F2BA|$0F:$F2AA:29 40   	AND #$40   	; pick out the equipped bit
0x03F2BC|$0F:$F2AC:F0 06   	BEQ $F2B4  	; skip ahead if item is not equipped
0x03F2BE|$0F:$F2AE:AD AC 60	LDA $60AC  	; menu list index
0x03F2C1|$0F:$F2B1:8D B9 60	STA $60B9  
; control flow target (from $F2AC)
0x03F2C4|$0F:$F2B4:20 F0 F2	JSR $F2F0  	; initialize string buffer $0100-$010C with [space]s, set maximum string length to #$0B if we're dealing with the second segment
0x03F2C7|$0F:$F2B7:AD AB 60	LDA $60AB  	; which list segment we're dealing with
0x03F2CA|$0F:$F2BA:29 01   	AND #$01   	; pretty sure the only options are 0 and 1, so this seems useless
0x03F2CC|$0F:$F2BC:F0 02   	BEQ $F2C0  	; if 0, use 0
0x03F2CE|$0F:$F2BE:A9 01   	LDA #$01   	; else use 1 (... but it already was 1)
; control flow target (from $F2BC)
0x03F2D0|$0F:$F2C0:A8      	TAY        	; set item pointer list index
0x03F2D1|$0F:$F2C1:AD AD 60	LDA $60AD  	; item ID
0x03F2D4|$0F:$F2C4:48      	PHA        	; item ID
0x03F2D5|$0F:$F2C5:29 40   	AND #$40   	; pick out the equipped bit
0x03F2D7|$0F:$F2C7:F0 1B   	BEQ $F2E4  	; if not equipped, skip ahead
0x03F2D9|$0F:$F2C9:AD AA 60	LDA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03F2DC|$0F:$F2CC:4A      	LSR        
0x03F2DD|$0F:$F2CD:90 15   	BCC $F2E4  	; if not replacing [left border] with [left border, equipped], skip ahead
0x03F2DF|$0F:$F2CF:AD AB 60	LDA $60AB  	; which list segment we're dealing with
0x03F2E2|$0F:$F2D2:4A      	LSR        
0x03F2E3|$0F:$F2D3:B0 0F   	BCS $F2E4  	; if not dealing with list segmetn 1, skip ahead
0x03F2E5|$0F:$F2D5:A9 00   	LDA #$00   	; otherwise reset current column
0x03F2E7|$0F:$F2D7:8D 9E 60	STA $609E  	; menu current column
0x03F2EA|$0F:$F2DA:A9 8B   	LDA #$8B   	; [left border, equipped]
0x03F2EC|$0F:$F2DC:20 2F F3	JSR $F32F  	; print A to menu
0x03F2EF|$0F:$F2DF:A9 5F   	LDA #$5F   	; [space]
0x03F2F1|$0F:$F2E1:20 2F F3	JSR $F32F  	; print A to menu
; control flow target (from $F2C7, $F2CD, $F2D3)
0x03F2F4|$0F:$F2E4:68      	PLA        	; item ID
0x03F2F5|$0F:$F2E5:29 3F   	AND #$3F   	; strip off the equipped bit
0x03F2F7|$0F:$F2E7:8D AD 60	STA $60AD  	; item ID
0x03F2FA|$0F:$F2EA:F0 03   	BEQ $F2EF  	; if no item, just RTS
0x03F2FC|$0F:$F2EC:20 FF F2	JSR $F2FF  	; given item ID in A, print name of item to $0100 in reverse
; control flow target (from $F2A2, $F2EA)
0x03F2FF|$0F:$F2EF:60      	RTS        

; initialize string buffer $0100-$010C with [space]s, set maximum string length to #$0B if we're dealing with the second segment
; control flow target (from $F29D, $F2B4)
0x03F300|$0F:$F2F0:20 9F F1	JSR $F19F  	; initialize string buffer $0100-$010C with [space]s
0x03F303|$0F:$F2F3:AD AB 60	LDA $60AB  	; which list segment we're dealing with
0x03F306|$0F:$F2F6:4A      	LSR        
0x03F307|$0F:$F2F7:90 05   	BCC $F2FE  	; if first segment, skip ahead
0x03F309|$0F:$F2F9:A9 0B   	LDA #$0B   	; max length of second segment
0x03F30B|$0F:$F2FB:8D A0 60	STA $60A0  	; maximum string length
; control flow target (from $F2F7)
0x03F30E|$0F:$F2FE:60      	RTS        

; given item ID in A, print name of item to $0100 in reverse
; control flow target (from $F2EC)
0x03F30F|$0F:$F2FF:48      	PHA        	; item ID
0x03F310|$0F:$F300:C9 21   	CMP #$21   	; split point for item list pointers
0x03F312|$0F:$F302:90 06   	BCC $F30A  	; if < #$21, use the first set of pointers
0x03F314|$0F:$F304:68      	PLA        	; item ID
0x03F315|$0F:$F305:E9 20   	SBC #$20   	; adjust item ID for second set of pointers; note that C is set since we got here by not taking BCC
0x03F317|$0F:$F307:C8      	INY        	; pointer address += 2
0x03F318|$0F:$F308:C8      	INY        
0x03F319|$0F:$F309:48      	PHA        	; item ID within list segment
; control flow target (from $F302)
0x03F31A|$0F:$F30A:B9 16 F3	LDA $F316,Y	; item list bank/pointers
0x03F31D|$0F:$F30D:20 E2 F3	JSR $F3E2  	; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value
0x03F320|$0F:$F310:68      	PLA        	; item ID within list segment
0x03F321|$0F:$F311:F0 07   	BEQ $F31A  	; load bank specified by $60D7 (set by last call to $F3E2)
0x03F323|$0F:$F313:4C F8 F3	JMP $F3F8  	; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2)


; code -> data
; item list bank/pointers
; indexed data load target (from $F30A)
0x03F326|$0F:$F316:D1	; $06:$8022; -> $06:$B2CA: Item list part 1, line 1
0x03F327|$0F:$F317:D2	; $06:$8024; -> $06:$B4B2: Item list part 1, line 2
0x03F328|$0F:$F318:D8	; $06:$8030; -> $06:$B3BE: Item list part 2, line 1
0x03F329|$0F:$F319:D9	; $06:$8032; -> $06:$B57C: Item list part 2, line 2

; data -> code
; load bank specified by $60D7 (set by last call to $F3E2)
; control flow target (from $F311, $F3FB)
0x03F32A|$0F:$F31A:48      	PHA        
0x03F32B|$0F:$F31B:AD D7 60	LDA $60D7  	; backup copy of current bank set by calls to $F3E2; used by $F31A
0x03F32E|$0F:$F31E:4C 82 F7	JMP $F782  	; load bank specified by A then PLA

; toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC
; control flow target (from $EEA3, $EFC9)
0x03F331|$0F:$F321:AD AB 60	LDA $60AB  	; which list segment we're dealing with
0x03F334|$0F:$F324:49 01   	EOR #$01   
0x03F336|$0F:$F326:D0 03   	BNE $F32B  
0x03F338|$0F:$F328:EE AC 60	INC $60AC  	; menu list index
; control flow target (from $F326)
0x03F33B|$0F:$F32B:8D AB 60	STA $60AB  	; which list segment we're dealing with
0x03F33E|$0F:$F32E:60      	RTS        

; print A to menu
; control flow target (from $F2DC, $F2E1)
0x03F33F|$0F:$F32F:8D 9B 60	STA $609B  	; menu text
0x03F342|$0F:$F332:4C E4 EF	JMP $EFE4  	; print one byte of menu text

; control flow target (from $EEB4)
0x03F345|$0F:$F335:AE AC 60	LDX $60AC  	; menu list index
0x03F348|$0F:$F338:A9 FF   	LDA #$FF   
0x03F34A|$0F:$F33A:9D BA 60	STA $60BA,X
0x03F34D|$0F:$F33D:AD 9D 60	LDA $609D  	; menu function parameter
0x03F350|$0F:$F340:0A      	ASL        	; A is either #$00 (battle spells) or #$01 (field spells), so this is either #$00 or #$02
0x03F351|$0F:$F341:65 4A   	ADC $4A    	; hero ID - 1
0x03F353|$0F:$F343:AA      	TAX        
0x03F354|$0F:$F344:BD 18 06	LDA $0618,X	; Cannock's learned battle spell list
0x03F357|$0F:$F347:85 10   	STA $10    	; selected hero's learned spell list
0x03F359|$0F:$F349:A9 80   	LDA #$80   
0x03F35B|$0F:$F34B:85 11   	STA $11    
0x03F35D|$0F:$F34D:AD AC 60	LDA $60AC  	; menu list index
0x03F360|$0F:$F350:AE 9D 60	LDX $609D  	; menu function parameter
0x03F363|$0F:$F353:D0 05   	BNE $F35A  	; branch if field spells
0x03F365|$0F:$F355:4A      	LSR        
0x03F366|$0F:$F356:A2 88   	LDX #$88   
0x03F368|$0F:$F358:86 11   	STX $11    
; control flow target (from $F353)
0x03F36A|$0F:$F35A:AA      	TAX        
; control flow target (from $F360)
0x03F36B|$0F:$F35B:CA      	DEX        
0x03F36C|$0F:$F35C:30 04   	BMI $F362  
0x03F36E|$0F:$F35E:46 11   	LSR $11    
0x03F370|$0F:$F360:90 F9   	BCC $F35B  
; control flow target (from $F35C)
0x03F372|$0F:$F362:AD 9D 60	LDA $609D  	; menu function parameter
0x03F375|$0F:$F365:29 01   	AND #$01   
0x03F377|$0F:$F367:D0 0D   	BNE $F376  	; branch if field spells
0x03F379|$0F:$F369:AD AC 60	LDA $60AC  	; menu list index
0x03F37C|$0F:$F36C:29 01   	AND #$01   
0x03F37E|$0F:$F36E:AA      	TAX        
0x03F37F|$0F:$F36F:BD 9D F3	LDA $F39D,X
0x03F382|$0F:$F372:25 11   	AND $11    
0x03F384|$0F:$F374:85 11   	STA $11    
; control flow target (from $F367)
0x03F386|$0F:$F376:A5 10   	LDA $10    	; selected hero's learned spell list
0x03F388|$0F:$F378:25 11   	AND $11    
0x03F38A|$0F:$F37A:F0 16   	BEQ $F392  
0x03F38C|$0F:$F37C:A5 4A   	LDA $4A    	; hero ID - 1
0x03F38E|$0F:$F37E:0A      	ASL        
0x03F38F|$0F:$F37F:0A      	ASL        
0x03F390|$0F:$F380:0A      	ASL        
0x03F391|$0F:$F381:0A      	ASL        
0x03F392|$0F:$F382:48      	PHA        
0x03F393|$0F:$F383:AD 9D 60	LDA $609D  	; menu function parameter
0x03F396|$0F:$F386:0A      	ASL        
0x03F397|$0F:$F387:0A      	ASL        
0x03F398|$0F:$F388:0A      	ASL        
0x03F399|$0F:$F389:85 12   	STA $12    
0x03F39B|$0F:$F38B:68      	PLA        
0x03F39C|$0F:$F38C:65 12   	ADC $12    
0x03F39E|$0F:$F38E:6D AC 60	ADC $60AC  	; menu list index
0x03F3A1|$0F:$F391:60      	RTS        

; control flow target (from $F37A)
0x03F3A2|$0F:$F392:A9 00   	LDA #$00   
0x03F3A4|$0F:$F394:AE AC 60	LDX $60AC  	; menu list index
0x03F3A7|$0F:$F397:9D BA 60	STA $60BA,X
0x03F3AA|$0F:$F39A:A9 FF   	LDA #$FF   
0x03F3AC|$0F:$F39C:60      	RTS        


; code -> data
; indexed data load target (from $F36F)
0x03F3AD|$0F:$F39D:F0
0x03F3AE|$0F:$F39E:0F

; data -> code
; given spell name index in A, print spell name to $0100 in reverse, set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2)
; control flow target (from $EEB7)
; external control flow target (from $02:$BEA5)
0x03F3AF|$0F:$F39F:48      	PHA        	; spell name index
0x03F3B0|$0F:$F3A0:20 9F F1	JSR $F19F  	; initialize string buffer $0100-$010C with [space]s
0x03F3B3|$0F:$F3A3:68      	PLA        	; spell name index
0x03F3B4|$0F:$F3A4:85 10   	STA $10    	; spell name index
0x03F3B6|$0F:$F3A6:C9 FF   	CMP #$FF   
0x03F3B8|$0F:$F3A8:F0 0C   	BEQ $F3B6  	; #$FF => not a real spell
0x03F3BA|$0F:$F3AA:A9 D3   	LDA #$D3   	; spell list bank/pointer
0x03F3BC|$0F:$F3AC:20 E2 F3	JSR $F3E2  	; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value
0x03F3BF|$0F:$F3AF:A6 10   	LDX $10    	; spell name index
0x03F3C1|$0F:$F3B1:E8      	INX        	; $F3F8 is one-based, so convert from zero-based
0x03F3C2|$0F:$F3B2:8A      	TXA        
0x03F3C3|$0F:$F3B3:20 F8 F3	JSR $F3F8  	; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2)
; control flow target (from $F3A8)
0x03F3C6|$0F:$F3B6:60      	RTS        

; given monster ID in A, copy monster name segment to $0100 in reverse
; control flow target (from $EFC3, $FC98, $FCB5)
0x03F3C7|$0F:$F3B7:85 10   	STA $10    	; save desired monster index for later (both here and in calling code)
0x03F3C9|$0F:$F3B9:86 11   	STX $11    	; pointless?
0x03F3CB|$0F:$F3BB:A0 00   	LDY #$00   	; start by assuming we're dealing with Monsters 1 Line 1 (LDY $60AB would save 6 bytes?)
0x03F3CD|$0F:$F3BD:AD AB 60	LDA $60AB  	; which list segment we're dealing with
0x03F3D0|$0F:$F3C0:4A      	LSR        	; shift low bit to C
0x03F3D1|$0F:$F3C1:90 01   	BCC $F3C4  	; C = 0 => first segment, so keep Y at #$00
0x03F3D3|$0F:$F3C3:C8      	INY        	; otherwise it's the second segment, so set Y = #$01
; control flow target (from $F3C1)
0x03F3D4|$0F:$F3C4:A5 10   	LDA $10    	; restore monster index
0x03F3D6|$0F:$F3C6:48      	PHA        	; save monster index
0x03F3D7|$0F:$F3C7:C9 33   	CMP #$33   	; is monster index < 51?
0x03F3D9|$0F:$F3C9:90 06   	BCC $F3D1  	; if monster index < 51, skip ahead
0x03F3DB|$0F:$F3CB:68      	PLA        	; pop old monster index
0x03F3DC|$0F:$F3CC:E9 32   	SBC #$32   	; otherwise subtract 50
0x03F3DE|$0F:$F3CE:C8      	INY        	; and use the second half of the pointer list
0x03F3DF|$0F:$F3CF:C8      	INY        
0x03F3E0|$0F:$F3D0:48      	PHA        	; push new monster index
; control flow target (from $F3C9)
0x03F3E1|$0F:$F3D1:B9 DE F3	LDA $F3DE,Y	; monster list bank/pointers
0x03F3E4|$0F:$F3D4:20 E2 F3	JSR $F3E2  	; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value
0x03F3E7|$0F:$F3D7:20 9F F1	JSR $F19F  	; initialize string buffer $0100-$010C with [space]s
0x03F3EA|$0F:$F3DA:68      	PLA        	; monster index
0x03F3EB|$0F:$F3DB:4C F8 F3	JMP $F3F8  	; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2)


; code -> data
; monster list bank/pointers
; indexed data load target (from $F3D1)
0x03F3EE|$0F:$F3DE:D4	; $06:$8028; -> $06:$B718: Monster list part 1, line 1
0x03F3EF|$0F:$F3DF:D5	; $06:$802A; -> $06:$B945: Monster list part 1, line 2
0x03F3F0|$0F:$F3E0:DA	; $06:$8034; -> $06:$B85E: Monster list part 2, line 1
0x03F3F1|$0F:$F3E1:DB	; $06:$8036; -> $06:$B9D5: Monster list part 2, line 2

; data -> code
; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value
; control flow target (from $EBB4, $F30D, $F3AC, $F3D4)
0x03F3F2|$0F:$F3E2:48      	PHA        
0x03F3F3|$0F:$F3E3:AD F6 05	LDA $05F6  	; current bank
0x03F3F6|$0F:$F3E6:8D D7 60	STA $60D7  	; backup copy of current bank set by calls to $F3E2; used by $F31A
0x03F3F9|$0F:$F3E9:68      	PLA        
0x03F3FA|$0F:$F3EA:20 33 FF	JSR $FF33  	; parse A into bank and pointer indices and load specified bank
0x03F3FD|$0F:$F3ED:BD 00 80	LDA $8000,X
0x03F400|$0F:$F3F0:85 57   	STA $57    	; pointer to start of main pointer table, low byte
0x03F402|$0F:$F3F2:BD 01 80	LDA $8001,X
0x03F405|$0F:$F3F5:85 58   	STA $58    	; pointer to start of main pointer table, high byte
0x03F407|$0F:$F3F7:60      	RTS        

; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2)
; control flow target (from $F313, $F3B3, $F3DB)
0x03F408|$0F:$F3F8:20 FE F3	JSR $F3FE  	; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied
0x03F40B|$0F:$F3FB:4C 1A F3	JMP $F31A  	; load bank specified by $60D7 (set by last call to $F3E2)

; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied
; control flow target (from $F3F8)
0x03F40E|$0F:$F3FE:AA      	TAX        
0x03F40F|$0F:$F3FF:A0 00   	LDY #$00   
; control flow target (from $F412, $F416)
0x03F411|$0F:$F401:CA      	DEX        
0x03F412|$0F:$F402:F0 14   	BEQ $F418  
; control flow target (from $F40B, $F40F)
0x03F414|$0F:$F404:B1 57   	LDA ($57),Y	; pointer to start of main pointer table, low byte; scan through ($57),Y, counting #$FF bytes until we've reached the right list item
0x03F416|$0F:$F406:C9 FF   	CMP #$FF   
0x03F418|$0F:$F408:F0 07   	BEQ $F411  
0x03F41A|$0F:$F40A:C8      	INY        
0x03F41B|$0F:$F40B:D0 F7   	BNE $F404  
0x03F41D|$0F:$F40D:E6 58   	INC $58    	; pointer to start of main pointer table, high byte
0x03F41F|$0F:$F40F:D0 F3   	BNE $F404  
; control flow target (from $F408)
0x03F421|$0F:$F411:C8      	INY        
0x03F422|$0F:$F412:D0 ED   	BNE $F401  
0x03F424|$0F:$F414:E6 58   	INC $58    	; pointer to start of main pointer table, high byte
0x03F426|$0F:$F416:D0 E9   	BNE $F401  
; control flow target (from $F402)
0x03F428|$0F:$F418:98      	TYA        
0x03F429|$0F:$F419:18      	CLC        
0x03F42A|$0F:$F41A:65 57   	ADC $57    	; pointer to start of main pointer table, low byte
0x03F42C|$0F:$F41C:85 57   	STA $57    	; pointer to start of main pointer table, low byte
0x03F42E|$0F:$F41E:90 02   	BCC $F422  
0x03F430|$0F:$F420:E6 58   	INC $58    	; pointer to start of main pointer table, high byte
; control flow target (from $F41E)
0x03F432|$0F:$F422:A0 00   	LDY #$00   
0x03F434|$0F:$F424:AE A0 60	LDX $60A0  	; maximum string length
; control flow target (from $F432)
0x03F437|$0F:$F427:B1 57   	LDA ($57),Y	; pointer to start of main pointer table, low byte
0x03F439|$0F:$F429:C9 FF   	CMP #$FF   
0x03F43B|$0F:$F42B:F0 07   	BEQ $F434  
0x03F43D|$0F:$F42D:9D FF 00	STA $00FF,X	; built-in offset from string copy buffer start at $0100
0x03F440|$0F:$F430:C8      	INY        
0x03F441|$0F:$F431:CA      	DEX        
0x03F442|$0F:$F432:D0 F3   	BNE $F427  
; control flow target (from $F42B, $F437)
0x03F444|$0F:$F434:60      	RTS        

; control flow target (from $EBA2)
0x03F445|$0F:$F435:A5 8E   	LDA $8E    	; flag for in battle or not (#$FF)?
0x03F447|$0F:$F437:D0 FB   	BNE $F434  
0x03F449|$0F:$F439:A5 4D   	LDA $4D    
0x03F44B|$0F:$F43B:85 0C   	STA $0C    
0x03F44D|$0F:$F43D:A5 4E   	LDA $4E    
0x03F44F|$0F:$F43F:85 0E   	STA $0E    
0x03F451|$0F:$F441:20 2D DE	JSR $DE2D  
0x03F454|$0F:$F444:A0 00   	LDY #$00   
0x03F456|$0F:$F446:84 12   	STY $12    
0x03F458|$0F:$F448:AD A3 60	LDA $60A3  	; menu window height (ROM value * 2)
0x03F45B|$0F:$F44B:4A      	LSR        
0x03F45C|$0F:$F44C:85 10   	STA $10    
; control flow target (from $F467)
0x03F45E|$0F:$F44E:AD A1 60	LDA $60A1  	; menu window width
0x03F461|$0F:$F451:4A      	LSR        
0x03F462|$0F:$F452:85 11   	STA $11    
0x03F464|$0F:$F454:A9 01   	LDA #$01   
; control flow target (from $F45B)
0x03F466|$0F:$F456:91 07   	STA ($07),Y	; mark menu open
0x03F468|$0F:$F458:C8      	INY        
0x03F469|$0F:$F459:C6 11   	DEC $11    
0x03F46B|$0F:$F45B:D0 F9   	BNE $F456  
0x03F46D|$0F:$F45D:A5 12   	LDA $12    
0x03F46F|$0F:$F45F:18      	CLC        
0x03F470|$0F:$F460:69 10   	ADC #$10   
0x03F472|$0F:$F462:85 12   	STA $12    
0x03F474|$0F:$F464:A8      	TAY        
0x03F475|$0F:$F465:C6 10   	DEC $10    
0x03F477|$0F:$F467:D0 E5   	BNE $F44E  
0x03F479|$0F:$F469:A5 35   	LDA $35    	; flag indicating whether any menu is currently open
0x03F47B|$0F:$F46B:48      	PHA        
0x03F47C|$0F:$F46C:A9 FF   	LDA #$FF   
0x03F47E|$0F:$F46E:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03F480|$0F:$F470:20 CB D8	JSR $D8CB  
0x03F483|$0F:$F473:68      	PLA        
0x03F484|$0F:$F474:85 35   	STA $35    	; flag indicating whether any menu is currently open
0x03F486|$0F:$F476:4C DC C1	JMP $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF

; print party gold to $0100 in decimal in reverse, replacing leading (now trailing) zeroes with spaces, leaving X at most significant digit
; control flow target (from $EDA7)
0x03F489|$0F:$F479:A9 05   	LDA #$05   
0x03F48B|$0F:$F47B:8D A0 60	STA $60A0  	; maximum string length
0x03F48E|$0F:$F47E:AD 24 06	LDA $0624  	; party gold, low byte
0x03F491|$0F:$F481:85 10   	STA $10    
0x03F493|$0F:$F483:AD 25 06	LDA $0625  	; party gold, high byte
0x03F496|$0F:$F486:85 11   	STA $11    
0x03F498|$0F:$F488:A9 00   	LDA #$00   
0x03F49A|$0F:$F48A:85 12   	STA $12    
0x03F49C|$0F:$F48C:20 7C F1	JSR $F17C  	; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0
0x03F49F|$0F:$F48F:4C 8D F1	JMP $F18D  	; scan through $0100 + maximum string length $60A0 in reverse, replacing zeroes with spaces until the first non-zero or $0100 is reached; leaves X at most significant digit

; display Menu ID #$02: Main menu: gold/crests
; external control flow target (from $06:$89DC)
0x03F4A2|$0F:$F492:A9 02   	LDA #$02   	; Menu ID #$02: Main menu: gold/crests
0x03F4A4|$0F:$F494:4C 89 EB	JMP $EB89  	; open menu specified by A

; display Menu ID #$03: Main menu: selected hero's status
; external control flow target (from $06:$89D6)
0x03F4A7|$0F:$F497:85 4A   	STA $4A    
0x03F4A9|$0F:$F499:A9 03   	LDA #$03   	; Menu ID #$03: Main menu: selected hero's status
0x03F4AB|$0F:$F49B:4C 89 EB	JMP $EB89  	; open menu specified by A

; external control flow target (from $04:$B5D8)
0x03F4AE|$0F:$F49E:85 4A   	STA $4A    
0x03F4B0|$0F:$F4A0:A9 07   	LDA #$07   	; Menu ID #$07: Battle menu: spell list
0x03F4B2|$0F:$F4A2:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F4B5|$0F:$F4A5:C9 FF   	CMP #$FF   
0x03F4B7|$0F:$F4A7:F0 04   	BEQ $F4AD  
0x03F4B9|$0F:$F4A9:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03F4BC|$0F:$F4AC:CA	; $06:$8014; -> $06:$AE3D: given hero ID - 1 in $4A and battle spell menu selection index in A, return spell ID in A

; data -> code
; control flow target (from $F4A7)
0x03F4BD|$0F:$F4AD:4C C2 F6	JMP $F6C2  	; load bank specified by $94

; given hero ID in A, display that hero's battle item list window and return the selected item ID in A
; external control flow target (from $04:$B5E1)
0x03F4C0|$0F:$F4B0:85 4A   	STA $4A    	; hero ID
0x03F4C2|$0F:$F4B2:A9 04   	LDA #$04   	; count all items
0x03F4C4|$0F:$F4B4:8D 9D 60	STA $609D  	; menu function parameter
0x03F4C7|$0F:$F4B7:20 B7 F1	JSR $F1B7  	; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory
0x03F4CA|$0F:$F4BA:F0 30   	BEQ $F4EC  	; no items => set A = #$FE and RTS
0x03F4CC|$0F:$F4BC:A9 08   	LDA #$08   	; Menu ID #$08: Battle menu: item list window 1
; control flow target (from $F4CD)
0x03F4CE|$0F:$F4BE:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F4D1|$0F:$F4C1:AE B1 60	LDX $60B1  
0x03F4D4|$0F:$F4C4:D0 09   	BNE $F4CF  
0x03F4D6|$0F:$F4C6:C9 FF   	CMP #$FF   
0x03F4D8|$0F:$F4C8:F0 1F   	BEQ $F4E9  
0x03F4DA|$0F:$F4CA:AD AE 60	LDA $60AE  	; menu link ID
0x03F4DD|$0F:$F4CD:D0 EF   	BNE $F4BE  
; control flow target (from $F4C4)
0x03F4DF|$0F:$F4CF:AE AE 60	LDX $60AE  	; menu link ID
0x03F4E2|$0F:$F4D2:E0 08   	CPX #$08   	; Menu ID #$08: Battle menu: item list window 1
0x03F4E4|$0F:$F4D4:D0 07   	BNE $F4DD  	; menu link ID != #$08 => we're currently in Menu ID #$08: Battle menu: item list window 1, so no need to adjust A
0x03F4E6|$0F:$F4D6:C9 FF   	CMP #$FF   	; #$FF stays #$FF
0x03F4E8|$0F:$F4D8:F0 0F   	BEQ $F4E9  
0x03F4EA|$0F:$F4DA:18      	CLC        	; otherwise, we're in Menu ID #$22: Battle menu: item list window 2; menu displays 4 items per page, so add 4 to the selected item index
0x03F4EB|$0F:$F4DB:69 04   	ADC #$04   
; control flow target (from $F4D4)
0x03F4ED|$0F:$F4DD:A2 04   	LDX #$04   	; count all items
0x03F4EF|$0F:$F4DF:C9 FE   	CMP #$FE   
0x03F4F1|$0F:$F4E1:B0 06   	BCS $F4E9  
0x03F4F3|$0F:$F4E3:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03F4F6|$0F:$F4E6:C8	; $06:$8010; -> $06:$ADFC: given a selected list index in A, an item type in X, and a hero ID in $4A, set A to the A'th item of type X in hero $4A's inventory

; data -> code
0x03F4F7|$0F:$F4E7:29 3F   	AND #$3F   	; strip off the equipped bit
; control flow target (from $F4C8, $F4D8, $F4E1)
0x03F4F9|$0F:$F4E9:4C C2 F6	JMP $F6C2  	; load bank specified by $94

; control flow target (from $F4BA)
0x03F4FC|$0F:$F4EC:A9 FE   	LDA #$FE   
0x03F4FE|$0F:$F4EE:60      	RTS        

; open battle command menu for hero A
; external control flow target (from $04:$B56E)
0x03F4FF|$0F:$F4EF:85 4A   	STA $4A    
0x03F501|$0F:$F4F1:AA      	TAX        
0x03F502|$0F:$F4F2:F0 1D   	BEQ $F511  	; if it's Midenhall, just display Midenhall's command menu
0x03F504|$0F:$F4F4:E0 01   	CPX #$01   
0x03F506|$0F:$F4F6:D0 07   	BNE $F4FF  	; branch if not Cannock
0x03F508|$0F:$F4F8:2C 2D 06	BIT $062D  	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03F50B|$0F:$F4FB:10 10   	BPL $F50D  	; Cannock: if Midenhall is dead, display alternate Cannock command menu
0x03F50D|$0F:$F4FD:70 0E   	BVS $F50D  	; Cannock: if Midenhall is asleep, display alternate Cannock command menu
; control flow target (from $F4F6)
0x03F50F|$0F:$F4FF:2C 2D 06	BIT $062D  	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03F512|$0F:$F502:10 02   	BPL $F506  	; Cannock would have taken the earlier BPL, so this is just Moonbrooke: if Midenhall is dead, check Cannock
0x03F514|$0F:$F504:50 0B   	BVC $F511  	; Cannock/Moonbrooke: if Midenhall is awake, display normal Cannock/Moonbrooke command menu
; control flow target (from $F502)
0x03F516|$0F:$F506:2C 3F 06	BIT $063F  	; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03F519|$0F:$F509:10 02   	BPL $F50D  	; Cannock must have taken one of the earlier BPL/BVS/BVC, so this is just Moonbrooke: if Cannock is dead, display alternate Moonbrooke command menu
0x03F51B|$0F:$F50B:50 04   	BVC $F511  	; Cannock must have taken one of the earlier BPL/BVS/BVC, so this is just Moonbrooke: if Cannock is awake, display normal Moonbrooke command menu
; control flow target (from $F4FB, $F4FD, $F509)
0x03F51D|$0F:$F50D:A2 03   	LDX #$03   	; index for alternate command menu
0x03F51F|$0F:$F50F:D0 00   	BNE $F511  	; useless op
; control flow target (from $F4F2, $F504, $F50B, $F50F)
0x03F521|$0F:$F511:BD 17 F5	LDA $F517,X	; Battle command menus
0x03F524|$0F:$F514:4C 89 EB	JMP $EB89  	; open menu specified by A


; code -> data
; Battle command menus
; indexed data load target (from $F511)
0x03F527|$0F:$F517:09	; Menu ID #$09: Battle menu: Midenhall's command options
0x03F528|$0F:$F518:23	; Menu ID #$23: Battle menu: Cannock/Moonbrooke's command options
0x03F529|$0F:$F519:23	; Menu ID #$23: Battle menu: Cannock/Moonbrooke's command options
0x03F52A|$0F:$F51A:49	; Menu ID #$49: Battle menu: Leader's command options when Midenhall asleep/dead

; data -> code
; display appropriate battle menu monster list
; external control flow target (from $04:$B5A9)
0x03F52B|$0F:$F51B:A5 4B   	LDA $4B    	; flag for whether to display the selectable or non-selectable monster list
0x03F52D|$0F:$F51D:D0 05   	BNE $F524  	; display Menu ID #$05: Battle menu: monster list, non-selectable
0x03F52F|$0F:$F51F:A9 0A   	LDA #$0A   	; Menu ID #$0A: Battle menu: monster list, selectable
0x03F531|$0F:$F521:4C 89 EB	JMP $EB89  	; open menu specified by A

; display Menu ID #$05: Battle menu: monster list, non-selectable
; control flow target (from $F51D)
0x03F534|$0F:$F524:A9 05   	LDA #$05   	; Menu ID #$05: Battle menu: monster list, non-selectable
0x03F536|$0F:$F526:4C 89 EB	JMP $EB89  	; open menu specified by A

; display appropriate battle menu item/spell target
; external control flow target (from $04:$B5E8)
0x03F539|$0F:$F529:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F53C|$0F:$F52C:F0 06   	BEQ $F534  	; if just Midenhall, no need to display hero select menu
0x03F53E|$0F:$F52E:BD 34 F5	LDA $F534,X
0x03F541|$0F:$F531:20 89 EB	JSR $EB89  	; open menu specified by A
; control flow target (from $F52C)
; indexed data load target (from $F52E)
0x03F544|$0F:$F534:60      	RTS        


; code -> data
; Battle item/spell target menus
0x03F545|$0F:$F535:0B	; Menu ID #$0B: Battle menu: Midenhall + Cannock item/spell target
0x03F546|$0F:$F536:24	; Menu ID #$24: Battle menu: Midenhall + Cannock + Moonbrooke item/spell target

; data -> code
; display hero select STATUS menu if necessary
; external control flow target (from $06:$89CA)
0x03F547|$0F:$F537:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F54A|$0F:$F53A:F0 06   	BEQ $F542  	; if just Midenhall, no need to display hero select menu
0x03F54C|$0F:$F53C:BD 42 F5	LDA $F542,X
0x03F54F|$0F:$F53F:20 89 EB	JSR $EB89  	; open menu specified by A
; control flow target (from $F53A)
; indexed data load target (from $F53C)
0x03F552|$0F:$F542:60      	RTS        


; code -> data
; main STATUS hero select menus
0x03F553|$0F:$F543:0C	; Menu ID #$0C: Main menu: STATUS with Midenhall + Cannock
0x03F554|$0F:$F544:25	; Menu ID #$25: Main menu: STATUS with Midenhall + Cannock + Moonbrooke

; data -> code
; depending on number of casters in party, maybe open caster select menu
; external control flow target (from $06:$8B36)
0x03F555|$0F:$F545:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F558|$0F:$F548:F0 10   	BEQ $F55A  	; if just Midenhall, no need to display hero select menu
0x03F55A|$0F:$F54A:CA      	DEX        
0x03F55B|$0F:$F54B:F0 0A   	BEQ $F557  	; if only 2 party members, Midenhall can't use magic, so no need to display menu
0x03F55D|$0F:$F54D:A9 0D   	LDA #$0D   	; Menu ID #$0D: Main menu: SPELL with Cannock + Moonbrooke
0x03F55F|$0F:$F54F:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F562|$0F:$F552:C9 FF   	CMP #$FF   
0x03F564|$0F:$F554:F0 03   	BEQ $F559  	; this is never true?
0x03F566|$0F:$F556:AA      	TAX        
; control flow target (from $F54B)
0x03F567|$0F:$F557:E8      	INX        
0x03F568|$0F:$F558:8A      	TXA        
; control flow target (from $F554)
0x03F569|$0F:$F559:60      	RTS        

; control flow target (from $F548)
0x03F56A|$0F:$F55A:A9 FE   	LDA #$FE   
0x03F56C|$0F:$F55C:60      	RTS        

; display appropriate main ITEM hero select menu
; external control flow target (from $06:$955B, $06:$9CC9)
0x03F56D|$0F:$F55D:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F570|$0F:$F560:F0 06   	BEQ $F568  	; if just Midenhall, no need to display hero select menu
0x03F572|$0F:$F562:BD 68 F5	LDA $F568,X
0x03F575|$0F:$F565:20 89 EB	JSR $EB89  	; open menu specified by A
; control flow target (from $F560)
; indexed data load target (from $F562)
0x03F578|$0F:$F568:60      	RTS        


; code -> data
; main ITEM hero select menus
0x03F579|$0F:$F569:0E	; Menu ID #$0E: Main menu: ITEM with Midenhall + Cannock
0x03F57A|$0F:$F56A:26	; Menu ID #$26: Main menu: ITEM with Midenhall + Cannock + Moonbrooke

; data -> code
; display appropriate main EQUIP hero select menu
; external control flow target (from $06:$8A02)
0x03F57B|$0F:$F56B:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F57E|$0F:$F56E:F0 06   	BEQ $F576  	; if just Midenhall, no need to display hero select menu
0x03F580|$0F:$F570:BD 76 F5	LDA $F576,X
0x03F583|$0F:$F573:20 89 EB	JSR $EB89  	; open menu specified by A
; control flow target (from $F56E)
; indexed data load target (from $F570)
0x03F586|$0F:$F576:60      	RTS        


; code -> data
; main EQUIP hero select menus
0x03F587|$0F:$F577:0F	; Menu ID #$0F: Main menu: EQUIP with Midenhall + Cannock
0x03F588|$0F:$F578:27	; Menu ID #$27: Main menu: EQUIP with Midenhall + Cannock + Moonbrooke

; data -> code
; display appropriate main SPELL target menu
; external control flow target (from $06:$8B98)
0x03F589|$0F:$F579:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F58C|$0F:$F57C:F0 06   	BEQ $F584  	; if just Midenhall, no need to display hero select menu
0x03F58E|$0F:$F57E:BD 84 F5	LDA $F584,X
0x03F591|$0F:$F581:20 89 EB	JSR $EB89  	; open menu specified by A
; control flow target (from $F57C)
; indexed data load target (from $F57E)
0x03F594|$0F:$F584:60      	RTS        


; code -> data
; main COMMAND menu SPELL target menus
0x03F595|$0F:$F585:10	; Menu ID #$10: Main menu: SPELL target, Midenhall + Cannock
0x03F596|$0F:$F586:28	; Menu ID #$28: Main menu: SPELL target, Midenhall + Cannock + Moonbrooke

; data -> code
; display appropriate main ITEM target menu
; external control flow target (from $06:$95B1, $06:$9629, $06:$99C1)
0x03F597|$0F:$F587:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F59A|$0F:$F58A:F0 06   	BEQ $F592  	; if just Midenhall, no need to display hero select menu
0x03F59C|$0F:$F58C:BD 92 F5	LDA $F592,X
0x03F59F|$0F:$F58F:20 89 EB	JSR $EB89  	; open menu specified by A
; control flow target (from $F58A)
; indexed data load target (from $F58C)
0x03F5A2|$0F:$F592:60      	RTS        


; code -> data
; main COMMAND menu ITEM target menus
0x03F5A3|$0F:$F593:11	; Menu ID #$11: Main menu: ITEM target, Midenhall + Cannock
0x03F5A4|$0F:$F594:29	; Menu ID #$29: Main menu: ITEM target, Midenhall + Cannock + Moonbrooke

; data -> code
; display appropriate shop BUY/SELL hero select menu
; external control flow target (from $06:$830E, $06:$8427, $06:$8490, $06:$8589, $06:$85D2, $06:$862B)
0x03F5A5|$0F:$F595:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F5A8|$0F:$F598:F0 06   	BEQ $F5A0  	; if just Midenhall, no need to display hero select menu
0x03F5AA|$0F:$F59A:BD A0 F5	LDA $F5A0,X
0x03F5AD|$0F:$F59D:20 89 EB	JSR $EB89  	; open menu specified by A
; control flow target (from $F598)
; indexed data load target (from $F59A)
0x03F5B0|$0F:$F5A0:60      	RTS        


; code -> data
; shop menu BUY/SELL hero select menus
0x03F5B1|$0F:$F5A1:12	; Menu ID #$12: Shop menu: buy/sell target, Midenhall + Cannock
0x03F5B2|$0F:$F5A2:2A	; Menu ID #$2A: Shop menu: buy/sell target, Midenhall + Cannock + Moonbrooke

; data -> code
; given a hero ID in A and an item type in X, display the EQUIP sub-menu for hero A and item type X, returning the selected item ID in A
; ##>hero ID
; external control flow target (from $06:$8A1D, $06:$8A2E)
0x03F5B3|$0F:$F5A3:85 4A   	STA $4A    
0x03F5B5|$0F:$F5A5:86 96   	STX $96    	; temp storage for item/spell/type/etc. IDs; item type
0x03F5B7|$0F:$F5A7:BD E8 F5	LDA $F5E8,X	; EQUIP sub-menu IDs
0x03F5BA|$0F:$F5AA:48      	PHA        	; EQUIP sub-menu ID
0x03F5BB|$0F:$F5AB:A5 A5   	LDA $A5    
0x03F5BD|$0F:$F5AD:48      	PHA        
0x03F5BE|$0F:$F5AE:20 EC D0	JSR $D0EC  	; update each hero's stats based on their current EXP
0x03F5C1|$0F:$F5B1:68      	PLA        
0x03F5C2|$0F:$F5B2:85 A5   	STA $A5    
0x03F5C4|$0F:$F5B4:A9 07   	LDA #$07   
0x03F5C6|$0F:$F5B6:20 8C F7	JSR $F78C  	; wipe selected menu region
0x03F5C9|$0F:$F5B9:A5 96   	LDA $96    	; temp storage for item/spell/type/etc. IDs; item type
0x03F5CB|$0F:$F5BB:8D 9D 60	STA $609D  	; menu function parameter
0x03F5CE|$0F:$F5BE:A9 00   	LDA #$00   
0x03F5D0|$0F:$F5C0:8D AA 60	STA $60AA  	; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped)
0x03F5D3|$0F:$F5C3:20 B7 F1	JSR $F1B7  	; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory
0x03F5D6|$0F:$F5C6:D0 0E   	BNE $F5D6  	; if hero has items of this type, branch to display the EQUIP sub-menu
0x03F5D8|$0F:$F5C8:68      	PLA        	; EQUIP sub-menu ID
0x03F5D9|$0F:$F5C9:C9 2F   	CMP #$2F   	; Menu ID #$2F: Main menu: equip helmet
0x03F5DB|$0F:$F5CB:D0 05   	BNE $F5D2  	; if we're processing the final EQUIP sub-menu but hero has no helmets, leave the current Attack/Defense menu on the screen for a bit
0x03F5DD|$0F:$F5CD:A9 48   	LDA #$48   	; Menu ID #$48: Main menu: Equip menu's current Attack/Defense
0x03F5DF|$0F:$F5CF:20 89 EB	JSR $EB89  	; open menu specified by A
; control flow target (from $F5CB)
0x03F5E2|$0F:$F5D2:A9 FE   	LDA #$FE   
0x03F5E4|$0F:$F5D4:D0 0F   	BNE $F5E5  	; load bank specified by $94
; control flow target (from $F5C6)
0x03F5E6|$0F:$F5D6:A9 48   	LDA #$48   	; Menu ID #$48: Main menu: Equip menu's current Attack/Defense
0x03F5E8|$0F:$F5D8:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F5EB|$0F:$F5DB:68      	PLA        	; EQUIP sub-menu
0x03F5EC|$0F:$F5DC:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F5EF|$0F:$F5DF:A6 96   	LDX $96    	; temp storage for item/spell/type/etc. IDs; item type
0x03F5F1|$0F:$F5E1:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03F5F4|$0F:$F5E4:C8	; $06:$8010; -> $06:$ADFC: given a selected list index in A, an item type in X, and a hero ID in $4A, set A to the A'th item of type X in hero $4A's inventory

; data -> code
; load bank specified by $94
; control flow target (from $F5D4, $F5F5)
0x03F5F5|$0F:$F5E5:4C C2 F6	JMP $F6C2  	; load bank specified by $94


; code -> data
; EQUIP sub-menu IDs
; indexed data load target (from $F5A7)
0x03F5F8|$0F:$F5E8:13	; Menu ID #$13: Main menu: equip weapon
0x03F5F9|$0F:$F5E9:2D	; Menu ID #$2D: Main menu: equip armour
0x03F5FA|$0F:$F5EA:2E	; Menu ID #$2E: Main menu: equip shield
0x03F5FB|$0F:$F5EB:2F	; Menu ID #$2F: Main menu: equip helmet

; data -> code
; given hero ID - 1 in A, open hero's spell list and return selected spell ID in A
; external control flow target (from $06:$8B6E)
0x03F5FC|$0F:$F5EC:85 4A   	STA $4A    	; hero ID - 1
0x03F5FE|$0F:$F5EE:A9 14   	LDA #$14   	; Menu ID #$14: Main menu: spell list
0x03F600|$0F:$F5F0:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F603|$0F:$F5F3:C9 FF   	CMP #$FF   
0x03F605|$0F:$F5F5:F0 EE   	BEQ $F5E5  	; load bank specified by $94
0x03F607|$0F:$F5F7:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03F60A|$0F:$F5FA:C9	; $06:$8012; -> $06:$AE30: given hero ID - 1 in $4A and field spell menu selection index in A, return spell ID in A

; data -> code
0x03F60B|$0F:$F5FB:4C C2 F6	JMP $F6C2  	; load bank specified by $94

; given a hero ID in A, open hero's item list and return selected item ID (or #$FE if they have no items)
; external control flow target (from $06:$84C1, $06:$9564, $06:$9CD8)
0x03F60E|$0F:$F5FE:85 4A   	STA $4A    	; hero ID
0x03F610|$0F:$F600:A9 04   	LDA #$04   	; count all items
0x03F612|$0F:$F602:8D 9D 60	STA $609D  	; menu function parameter
0x03F615|$0F:$F605:20 B7 F1	JSR $F1B7  	; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory
0x03F618|$0F:$F608:F0 0E   	BEQ $F618  	; if no items, don't open the item list
0x03F61A|$0F:$F60A:A9 15   	LDA #$15   	; Menu ID #$15: Main menu: item list
0x03F61C|$0F:$F60C:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F61F|$0F:$F60F:A2 04   	LDX #$04   	; parameter for $06:$ADFC: count all items
0x03F621|$0F:$F611:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03F624|$0F:$F614:C8	; $06:$8010; -> $06:$ADFC: given a selected list index in A, an item type in X, and a hero ID in $4A, set A to the A'th item of type X in hero $4A's inventory

; data -> code
0x03F625|$0F:$F615:4C C2 F6	JMP $F6C2  	; load bank specified by $94

; control flow target (from $F608)
0x03F628|$0F:$F618:A9 FE   	LDA #$FE   
0x03F62A|$0F:$F61A:60      	RTS        

; display shop menu item list for shop ID given in A, returning selected item (with Jailor's Key replaced by blank) in A
; external control flow target (from $06:$82DE, $06:$83CA)
0x03F62B|$0F:$F61B:8D AF 60	STA $60AF  	; shop ID
0x03F62E|$0F:$F61E:A9 1B   	LDA #$1B   	; Menu ID #$1B: Shop menu: current gold
0x03F630|$0F:$F620:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F633|$0F:$F623:A9 16   	LDA #$16   	; Menu ID #$16: Shop menu: Item BUY list
0x03F635|$0F:$F625:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F638|$0F:$F628:C9 FF   	CMP #$FF   
0x03F63A|$0F:$F62A:F0 0C   	BEQ $F638  
0x03F63C|$0F:$F62C:8D AC 60	STA $60AC  	; menu list index
0x03F63F|$0F:$F62F:20 7C F2	JSR $F27C  	; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID
0x03F642|$0F:$F632:C9 39   	CMP #$39   	; Item ID #$39: Jailor’s Key
0x03F644|$0F:$F634:D0 02   	BNE $F638  
0x03F646|$0F:$F636:A9 00   	LDA #$00   
; control flow target (from $F62A, $F634)
0x03F648|$0F:$F638:4C C2 F6	JMP $F6C2  	; load bank specified by $94

; display Menu ID #$1C: Main menu: status screen equipped items
; external control flow target (from $06:$89E1)
0x03F64B|$0F:$F63B:85 4A   	STA $4A    
0x03F64D|$0F:$F63D:A9 1C   	LDA #$1C   	; Menu ID #$1C: Main menu: status screen equipped items
0x03F64F|$0F:$F63F:4C 89 EB	JMP $EB89  	; open menu specified by A

; display appropriate battle EXP + Gold menu
; external control flow target (from $04:$9940)
0x03F652|$0F:$F642:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F655|$0F:$F645:BD 4B F6	LDA $F64B,X	; Battle menu EXP + Gold
0x03F658|$0F:$F648:4C 89 EB	JMP $EB89  	; open menu specified by A


; code -> data
; Battle menu EXP + Gold
; indexed data load target (from $F645)
0x03F65B|$0F:$F64B:1D	; Menu ID #$1D: Battle menu: Midenhall EXP + Gold
0x03F65C|$0F:$F64C:2B	; Menu ID #$2B: Battle menu: Midenhall + Cannock EXP + Gold
0x03F65D|$0F:$F64D:2C	; Menu ID #$2C: Battle menu: Midenhall + Cannock + Moonbrooke EXP + Gold

; data -> code
; display spell lists
; external control flow target (from $06:$89FC)
0x03F65E|$0F:$F64E:85 4A   	STA $4A    
0x03F660|$0F:$F650:A9 30   	LDA #$30   	; Menu ID #$30: Main menu: out-of-battle spell list
0x03F662|$0F:$F652:20 89 EB	JSR $EB89  	; open menu specified by A
0x03F665|$0F:$F655:A9 31   	LDA #$31   	; Menu ID #$31: Main menu: battle spell list
0x03F667|$0F:$F657:4C 89 EB	JMP $EB89  	; open menu specified by A

; set A and X to the current number of party members
; control flow target (from $F529, $F537, $F545, $F55D, $F56B, $F579, $F587, $F595, $F642, $F685)
0x03F66A|$0F:$F65A:A2 00   	LDX #$00   	; you always have Midenhall
0x03F66C|$0F:$F65C:AD 3F 06	LDA $063F  	; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03F66F|$0F:$F65F:29 04   	AND #$04   	; pick out the In Party bit
0x03F671|$0F:$F661:F0 01   	BEQ $F664  	; if Cannock not in party, don't INX; no Cannock => no Moonbrooke, so BEQ $F66C would be faster
0x03F673|$0F:$F663:E8      	INX        
; control flow target (from $F661)
0x03F674|$0F:$F664:AD 51 06	LDA $0651  	; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03F677|$0F:$F667:29 04   	AND #$04   	; pick out the In Party bit
0x03F679|$0F:$F669:F0 01   	BEQ $F66C  	; if Moonbrooke not in party, don't INX
0x03F67B|$0F:$F66B:E8      	INX        
; control flow target (from $F669)
0x03F67C|$0F:$F66C:8A      	TXA        
0x03F67D|$0F:$F66D:60      	RTS        

; do special effects for certain menus; sets A to menu ID
; control flow target (from $EB89)
0x03F67E|$0F:$F66E:C9 19   	CMP #$19   	; Menu ID #$19: General menu: YES/NO
0x03F680|$0F:$F670:F0 1F   	BEQ $F691  	; YES/NO menu extra: play double beep SFX
0x03F682|$0F:$F672:C9 04   	CMP #$04   	; Menu ID #$04: Dialogue window
0x03F684|$0F:$F674:F0 2D   	BEQ $F6A3  	; initialize main dialogue window
0x03F686|$0F:$F676:C9 06   	CMP #$06   	; Menu ID #$06: Map menu: main COMMAND menu
0x03F688|$0F:$F678:F0 20   	BEQ $F69A  	; COMMAND menu extra: play single beep SFX
0x03F68A|$0F:$F67A:C9 02   	CMP #$02   	; Menu ID #$02: Main menu: gold/crests
0x03F68C|$0F:$F67C:B0 11   	BCS $F68F  	; anything else > 1 just does SEC and RTS
0x03F68E|$0F:$F67E:85 10   	STA $10    	; at this point A is either Menu ID #$00: Mini status window, bottom or Menu ID #$01: Mini status window, top and C is clear
0x03F690|$0F:$F680:0A      	ASL        
0x03F691|$0F:$F681:65 10   	ADC $10    
0x03F693|$0F:$F683:85 10   	STA $10    	; A = A * 3; 3 versions of each menu
0x03F695|$0F:$F685:20 5A F6	JSR $F65A  	; set A and X to the current number of party members
0x03F698|$0F:$F688:18      	CLC        
0x03F699|$0F:$F689:65 10   	ADC $10    	; add number of party members to menu type offset
0x03F69B|$0F:$F68B:AA      	TAX        
0x03F69C|$0F:$F68C:BD C8 F6	LDA $F6C8,X	; mini status menu IDs
; control flow target (from $F67C)
0x03F69F|$0F:$F68F:38      	SEC        
0x03F6A0|$0F:$F690:60      	RTS        

; YES/NO menu extra: play double beep SFX
; control flow target (from $F670)
0x03F6A1|$0F:$F691:A9 86   	LDA #$86   	; Music ID #$86: double beep SFX
0x03F6A3|$0F:$F693:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03F6A6|$0F:$F696:A9 19   	LDA #$19   
0x03F6A8|$0F:$F698:38      	SEC        
0x03F6A9|$0F:$F699:60      	RTS        

; COMMAND menu extra: play single beep SFX
; control flow target (from $F678)
0x03F6AA|$0F:$F69A:A9 85   	LDA #$85   	; Music ID #$85: single beep SFX
0x03F6AC|$0F:$F69C:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
0x03F6AF|$0F:$F69F:A9 06   	LDA #$06   
0x03F6B1|$0F:$F6A1:38      	SEC        
0x03F6B2|$0F:$F6A2:60      	RTS        

; initialize main dialogue window
; control flow target (from $F674)
0x03F6B3|$0F:$F6A3:A9 00   	LDA #$00   
0x03F6B5|$0F:$F6A5:8D D0 60	STA $60D0  
0x03F6B8|$0F:$F6A8:8D D1 60	STA $60D1  
0x03F6BB|$0F:$F6AB:A2 B0   	LDX #$B0   	; write #$B0 [space] to $06F8-$07A7, a.k.a. blank out the main dialogue window
0x03F6BD|$0F:$F6AD:A9 5F   	LDA #$5F   
; control flow target (from $F6B3)
0x03F6BF|$0F:$F6AF:9D F7 06	STA $06F7,X
0x03F6C2|$0F:$F6B2:CA      	DEX        
0x03F6C3|$0F:$F6B3:D0 FA   	BNE $F6AF  
0x03F6C5|$0F:$F6B5:A9 00   	LDA #$00   
0x03F6C7|$0F:$F6B7:85 7C   	STA $7C    
0x03F6C9|$0F:$F6B9:85 7D   	STA $7D    
0x03F6CB|$0F:$F6BB:8D C8 60	STA $60C8  	; speech sound effect / auto-indent flag
0x03F6CE|$0F:$F6BE:A9 04   	LDA #$04   
0x03F6D0|$0F:$F6C0:38      	SEC        
0x03F6D1|$0F:$F6C1:60      	RTS        

; load bank specified by $94
; control flow target (from $F4AD, $F4E9, $F5E5, $F5FB, $F615, $F638, $FA65, $FC85, $FF94)
0x03F6D2|$0F:$F6C2:48      	PHA        
0x03F6D3|$0F:$F6C3:A5 94   	LDA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03F6D5|$0F:$F6C5:4C 82 F7	JMP $F782  	; load bank specified by A then PLA


; code -> data
; mini status menu IDs
; indexed data load target (from $F68C)
0x03F6D8|$0F:$F6C8:00	; Mini status window, bottom, Midenhall only
0x03F6D9|$0F:$F6C9:1E	; Mini status window, bottom, Midenhall + Cannock
0x03F6DA|$0F:$F6CA:1F	; Mini status window, bottom, Midenhall + Cannock + Moonbrooke
0x03F6DB|$0F:$F6CB:01	; Mini status window, top, Midenhall only
0x03F6DC|$0F:$F6CC:20	; Mini status window, top, Midenhall + Cannock
0x03F6DD|$0F:$F6CD:21	; Mini status window, top, Midenhall + Cannock + Moonbrooke

; data -> code
; return number of party members - 1 in A/X
; control flow target (from $CDB5)
; external control flow target (from $06:$8223, $06:$82F1, $06:$83EE, $06:$8485, $06:$857E, $06:$85C7, $06:$8620, $06:$8FD2, $06:$9023, $06:$93A3, $06:$99AF, $06:$9C80, $06:$A241)
0x03F6DE|$0F:$F6CE:A0 00   	LDY #$00   	; status index
0x03F6E0|$0F:$F6D0:A2 00   	LDX #$00   	; party member counter
0x03F6E2|$0F:$F6D2:A9 03   	LDA #$03   	; maximum number of party members
0x03F6E4|$0F:$F6D4:85 0C   	STA $0C    	; remaining party members to check
; control flow target (from $F6E5)
0x03F6E6|$0F:$F6D6:B9 2D 06	LDA $062D,Y	; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence)
0x03F6E9|$0F:$F6D9:29 04   	AND #$04   	; pick out the "In Party" bit
0x03F6EB|$0F:$F6DB:F0 01   	BEQ $F6DE  	; if member is in party, increment party member counter
0x03F6ED|$0F:$F6DD:E8      	INX        
; control flow target (from $F6DB)
0x03F6EE|$0F:$F6DE:98      	TYA        	; update status index for next party member
0x03F6EF|$0F:$F6DF:18      	CLC        
0x03F6F0|$0F:$F6E0:69 12   	ADC #$12   	; hero data is #$12 bytes long
0x03F6F2|$0F:$F6E2:A8      	TAY        
0x03F6F3|$0F:$F6E3:C6 0C   	DEC $0C    	; remaining party members to check
0x03F6F5|$0F:$F6E5:D0 EF   	BNE $F6D6  	; if more members to check, check them
0x03F6F7|$0F:$F6E7:CA      	DEX        
0x03F6F8|$0F:$F6E8:8A      	TXA        
0x03F6F9|$0F:$F6E9:60      	RTS        

; open main dialogue window and display string ID specified by byte following JSR
; control flow target (from $C83E, $CAA5, $CB90, $CBFC, $CC72)
; external control flow target (from $06:$80EF, $06:$8B83, $07:$81F3, $07:$8223, $07:$8234, $07:$827B, $07:$82E7, $07:$8351, $07:$8362, $07:$8369, $07:$83FE, $07:$84C7, $07:$8582)
0x03F6FA|$0F:$F6EA:20 FC F6	JSR $F6FC  	; open main dialogue window, set A to string ID specified by byte following second JSR
0x03F6FD|$0F:$F6ED:4C 4A FA	JMP $FA4A  	; display string ID specified by A

; open main dialogue window and display string ID specified by byte following JSR + #$0100
; external control flow target (from $06:$80C3, $06:$822E, $06:$82C3, $06:$839F, $06:$8553, $06:$86C0, $06:$8A49)
0x03F700|$0F:$F6F0:20 FC F6	JSR $F6FC  	; open main dialogue window, set A to string ID specified by byte following second JSR
0x03F703|$0F:$F6F3:4C 4E FA	JMP $FA4E  	; display string ID specified by A + #$0100

; open main dialogue window and display string ID specified by byte following JSR + #$0200
; control flow target (from $C940, $C9AB, $C9F2, $CB2E, $CC4D)
; external control flow target (from $06:$80E1, $06:$81A6, $06:$82BC, $06:$9368, $06:$A2C6)
0x03F706|$0F:$F6F6:20 FC F6	JSR $F6FC  	; open main dialogue window, set A to string ID specified by byte following second JSR
0x03F709|$0F:$F6F9:4C 52 FA	JMP $FA52  	; display string ID specified by A + #$0200

; open main dialogue window, set A to string ID specified by byte following second JSR
; control flow target (from $F6EA, $F6F0, $F6F6)
0x03F70C|$0F:$F6FC:20 76 EB	JSR $EB76  	; open menu specified by next byte

; code -> data
; indirect data load target
0x03F70F|$0F:$F6FF:04	; Menu ID #$04: Dialogue window

; data -> code
0x03F710|$0F:$F700:68      	PLA        	; first JSR's return address, low byte
0x03F711|$0F:$F701:85 0C   	STA $0C    	; first JSR's return address, low byte
0x03F713|$0F:$F703:68      	PLA        	; first JSR's return address, high byte
0x03F714|$0F:$F704:85 0D   	STA $0D    	; first JSR's return address, high byte
0x03F716|$0F:$F706:68      	PLA        	; second JSR's return address, low byte
0x03F717|$0F:$F707:18      	CLC        
0x03F718|$0F:$F708:69 01   	ADC #$01   	; byte following second JSR is data
0x03F71A|$0F:$F70A:85 0E   	STA $0E    	; second JSR's new return address, low byte
0x03F71C|$0F:$F70C:68      	PLA        	; second JSR's return address, high byte
0x03F71D|$0F:$F70D:69 00   	ADC #$00   	; add carry from incrementing low byte
0x03F71F|$0F:$F70F:85 0F   	STA $0F    
0x03F721|$0F:$F711:48      	PHA        	; second JSR's new return address, high byte
0x03F722|$0F:$F712:A5 0E   	LDA $0E    	; second JSR's new return address, low byte
0x03F724|$0F:$F714:48      	PHA        	; second JSR's new return address, low byte
0x03F725|$0F:$F715:A0 00   	LDY #$00   
0x03F727|$0F:$F717:B1 0E   	LDA ($0E),Y	; read byte following second JSR
0x03F729|$0F:$F719:A8      	TAY        	; stash in Y for now
0x03F72A|$0F:$F71A:A5 0D   	LDA $0D    	; first JSR's return address, high byte
0x03F72C|$0F:$F71C:48      	PHA        	; first JSR's return address, high byte
0x03F72D|$0F:$F71D:A5 0C   	LDA $0C    	; first JSR's return address, low byte
0x03F72F|$0F:$F71F:48      	PHA        	; first JSR's return address, low byte
0x03F730|$0F:$F720:98      	TYA        	; copy desired menu ID to A
0x03F731|$0F:$F721:60      	RTS        

; restore the hero ID in A's MP by a random amount based on the Wizard's Ring's power; returns a random number between $03 and #$0A in A and $99
; external control flow target (from $06:$97FE)
0x03F732|$0F:$F722:20 66 F7	JSR $F766  	; load ROM bank #$04
; call to code in a different bank ($04:$8003)
0x03F735|$0F:$F725:20 03 80	JSR $8003  	; restore the hero ID in A's MP by a random amount based on the Wizard's Ring's power; returns a random number between $03 and #$0A in A and $99
0x03F738|$0F:$F728:4C 61 F7	JMP $F761  	; load ROM bank #$06

; heal hero ID in A by random amount based on healing power in X
; identical to $0F:$D146
; external control flow target (from $06:$95F3)
0x03F73B|$0F:$F72B:20 66 F7	JSR $F766  	; load ROM bank #$04
; call to code in a different bank ($04:$8006)
0x03F73E|$0F:$F72E:20 06 80	JSR $8006  
0x03F741|$0F:$F731:4C 61 F7	JMP $F761  	; load ROM bank #$06

; set $8F-$90 to EXP required to reach next level
; external control flow target (from $06:$9473)
0x03F744|$0F:$F734:20 66 F7	JSR $F766  	; load ROM bank #$04
; call to code in a different bank ($04:$800C)
0x03F747|$0F:$F737:20 0C 80	JSR $800C  	; set $8F-$90 to EXP required to reach next level
0x03F74A|$0F:$F73A:4C 61 F7	JMP $F761  	; load ROM bank #$06

; calls $04:$99E6
; external control flow target (from $06:$9900, $06:$990C, $06:$995B, $06:$99A0)
0x03F74D|$0F:$F73D:20 66 F7	JSR $F766  	; load ROM bank #$04
; call to code in a different bank ($04:$8012)
0x03F750|$0F:$F740:20 12 80	JSR $8012  
0x03F753|$0F:$F743:4C 61 F7	JMP $F761  	; load ROM bank #$06

; external control flow target (from $04:$A176)
0x03F756|$0F:$F746:20 61 F7	JSR $F761  	; load ROM bank #$06
0x03F759|$0F:$F749:A0 06   	LDY #$06   
0x03F75B|$0F:$F74B:84 94   	STY $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
; call to code in a different bank ($06:$9829)
0x03F75D|$0F:$F74D:20 29 98	JSR $9829  
0x03F760|$0F:$F750:A0 04   	LDY #$04   
0x03F762|$0F:$F752:84 94   	STY $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03F764|$0F:$F754:4C 66 F7	JMP $F766  	; load ROM bank #$04


; code -> data
; table of first item IDs for each item type
; external indexed data load target (from $06:$8A68)
0x03F767|$0F:$F757:01	; Weapons
; external indexed data load target (from $06:$8A6D)
0x03F768|$0F:$F758:11	; Armour
0x03F769|$0F:$F759:1C	; Helmets
0x03F76A|$0F:$F75A:21	; Shields
0x03F76B|$0F:$F75B:24	; non-EQUIP items

; data -> code
; load ROM bank #$00
; control flow target (from $C6A8, $D21D, $D231, $D23E, $D250, $D29C, $D2A9, $D302, $D334, $D494, $E41D, $E43F)
0x03F76C|$0F:$F75C:48      	PHA        
0x03F76D|$0F:$F75D:A9 00   	LDA #$00   
0x03F76F|$0F:$F75F:F0 21   	BEQ $F782  	; load bank specified by A then PLA
; load ROM bank #$06
; control flow target (from $C6ED, $C70C, $C786, $C89B, $CCAC, $CD48, $CF67, $D0F2, $D14C, $D156, $D164, $D215, $D23B, $D259, $D2EC, $D2F4, $D32B, $D57E, $E435, $E8B2, $EEC9, $F255, $F289, $F728, $F731, $F73A, $F743, $F746)
0x03F771|$0F:$F761:48      	PHA        
0x03F772|$0F:$F762:A9 06   	LDA #$06   
0x03F774|$0F:$F764:D0 1C   	BNE $F782  	; load bank specified by A then PLA
; load ROM bank #$04
; control flow target (from $C771, $C8EC, $C95C, $D0EC, $D146, $D1A4, $D1C9, $D200, $D25C, $F722, $F72B, $F734, $F73D, $F754)
0x03F776|$0F:$F766:48      	PHA        
0x03F777|$0F:$F767:A9 04   	LDA #$04   
0x03F779|$0F:$F769:D0 17   	BNE $F782  	; load bank specified by A then PLA
; laod ROM bank #$01
0x03F77B|$0F:$F76B:48      	PHA        
0x03F77C|$0F:$F76C:A9 01   	LDA #$01   
0x03F77E|$0F:$F76E:D0 12   	BNE $F782  	; load bank specified by A then PLA
; load ROM bank #$02
; control flow target (from $CF61, $D369, $D5B6, $D7D4, $D7EE, $D890, $DECE, $DF86, $E169, $E3E8, $E445, $E461, $E4DF, $E94A, $F9AA, $FA8A, $FE3A)
0x03F780|$0F:$F770:48      	PHA        
0x03F781|$0F:$F771:A9 02   	LDA #$02   
0x03F783|$0F:$F773:D0 0D   	BNE $F782  	; load bank specified by A then PLA
; load ROM bank #$03
; control flow target (from $C680, $D17C, $D517, $D7A6, $D81C, $D8D0, $DB96, $DC9C, $DFC9, $E2F9)
0x03F785|$0F:$F775:48      	PHA        
0x03F786|$0F:$F776:A9 03   	LDA #$03   
0x03F788|$0F:$F778:D0 08   	BNE $F782  	; load bank specified by A then PLA
; load ROM bank #$07
; control flow target (from $D969)
0x03F78A|$0F:$F77A:48      	PHA        
0x03F78B|$0F:$F77B:A9 07   	LDA #$07   
0x03F78D|$0F:$F77D:D0 03   	BNE $F782  	; load bank specified by A then PLA
; load ROM bank #$05
0x03F78F|$0F:$F77F:48      	PHA        
0x03F790|$0F:$F780:A9 05   	LDA #$05   
; load bank specified by A then PLA
; control flow target (from $EB95, $F31E, $F6C5, $F75F, $F764, $F769, $F76E, $F773, $F778, $F77D)
0x03F792|$0F:$F782:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03F795|$0F:$F785:68      	PLA        
0x03F796|$0F:$F786:60      	RTS        

; control flow target (from $CF70)
0x03F797|$0F:$F787:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03F79A|$0F:$F78A:41	; $02:$8002

; data -> code
0x03F79B|$0F:$F78B:60      	RTS        

; wipe selected menu region
; control flow target (from $CF6A, $D130, $D135, $D13A, $E5BB, $F5B6)
; external control flow target (from $04:$9ACC)
0x03F79C|$0F:$F78C:85 0C   	STA $0C    	; A values of #$00, #$01, #$02, and #$05 wipe all menus; #$03, #$04, #$06, and #$07 do not
0x03F79E|$0F:$F78E:C9 05   	CMP #$05   
0x03F7A0|$0F:$F790:F0 04   	BEQ $F796  
0x03F7A2|$0F:$F792:C9 03   	CMP #$03   
0x03F7A4|$0F:$F794:B0 02   	BCS $F798  
; control flow target (from $F790)
0x03F7A6|$0F:$F796:A9 00   	LDA #$00   
; control flow target (from $F794)
0x03F7A8|$0F:$F798:85 2E   	STA $2E    	; whether to wipe all menus (#$00) or not
0x03F7AA|$0F:$F79A:A5 0C   	LDA $0C    
0x03F7AC|$0F:$F79C:0A      	ASL        
0x03F7AD|$0F:$F79D:0A      	ASL        
0x03F7AE|$0F:$F79E:A8      	TAY        
0x03F7AF|$0F:$F79F:B9 DB F8	LDA $F8DB,Y
0x03F7B2|$0F:$F7A2:29 0F   	AND #$0F   
0x03F7B4|$0F:$F7A4:85 0C   	STA $0C    
0x03F7B6|$0F:$F7A6:38      	SEC        
0x03F7B7|$0F:$F7A7:E9 08   	SBC #$08   
0x03F7B9|$0F:$F7A9:0A      	ASL        
0x03F7BA|$0F:$F7AA:85 18   	STA $18    
0x03F7BC|$0F:$F7AC:B9 DC F8	LDA $F8DC,Y
0x03F7BF|$0F:$F7AF:85 0E   	STA $0E    
0x03F7C1|$0F:$F7B1:48      	PHA        
0x03F7C2|$0F:$F7B2:0A      	ASL        
0x03F7C3|$0F:$F7B3:0A      	ASL        
0x03F7C4|$0F:$F7B4:0A      	ASL        
0x03F7C5|$0F:$F7B5:0A      	ASL        
0x03F7C6|$0F:$F7B6:05 0C   	ORA $0C    
0x03F7C8|$0F:$F7B8:8D 7C 60	STA $607C  
0x03F7CB|$0F:$F7BB:68      	PLA        
0x03F7CC|$0F:$F7BC:38      	SEC        
0x03F7CD|$0F:$F7BD:E9 07   	SBC #$07   
0x03F7CF|$0F:$F7BF:0A      	ASL        
0x03F7D0|$0F:$F7C0:85 19   	STA $19    
0x03F7D2|$0F:$F7C2:B9 DD F8	LDA $F8DD,Y
0x03F7D5|$0F:$F7C5:85 53   	STA $53    
0x03F7D7|$0F:$F7C7:85 4E   	STA $4E    
0x03F7D9|$0F:$F7C9:B9 DE F8	LDA $F8DE,Y
0x03F7DC|$0F:$F7CC:85 54   	STA $54    
0x03F7DE|$0F:$F7CE:A5 53   	LDA $53    
0x03F7E0|$0F:$F7D0:0A      	ASL        
0x03F7E1|$0F:$F7D1:65 18   	ADC $18    
0x03F7E3|$0F:$F7D3:85 18   	STA $18    
0x03F7E5|$0F:$F7D5:85 4D   	STA $4D    
0x03F7E7|$0F:$F7D7:A5 4E   	LDA $4E    
0x03F7E9|$0F:$F7D9:29 0F   	AND #$0F   
0x03F7EB|$0F:$F7DB:18      	CLC        
0x03F7EC|$0F:$F7DC:69 01   	ADC #$01   
0x03F7EE|$0F:$F7DE:09 10   	ORA #$10   
0x03F7F0|$0F:$F7E0:8D 7B 60	STA $607B  
0x03F7F3|$0F:$F7E3:20 31 DE	JSR $DE31  
0x03F7F6|$0F:$F7E6:A5 07   	LDA $07    
0x03F7F8|$0F:$F7E8:85 4F   	STA $4F    
0x03F7FA|$0F:$F7EA:A5 08   	LDA $08    
0x03F7FC|$0F:$F7EC:85 50   	STA $50    
; control flow target (from $F85C)
0x03F7FE|$0F:$F7EE:A5 4E   	LDA $4E    
0x03F800|$0F:$F7F0:0A      	ASL        
0x03F801|$0F:$F7F1:8D 9E 60	STA $609E  	; menu current column
; control flow target (from $F838)
0x03F804|$0F:$F7F4:A4 53   	LDY $53    
0x03F806|$0F:$F7F6:A5 2E   	LDA $2E    	; whether to wipe all menus (#$00) or not
0x03F808|$0F:$F7F8:F0 2B   	BEQ $F825  	; display background tiles
0x03F80A|$0F:$F7FA:C9 03   	CMP #$03   
0x03F80C|$0F:$F7FC:F0 0A   	BEQ $F808  
0x03F80E|$0F:$F7FE:C9 07   	CMP #$07   
0x03F810|$0F:$F800:F0 06   	BEQ $F808  
0x03F812|$0F:$F802:A9 10   	LDA #$10   
0x03F814|$0F:$F804:85 1E   	STA $1E    
0x03F816|$0F:$F806:D0 0E   	BNE $F816  
; control flow target (from $F7FC, $F800)
0x03F818|$0F:$F808:A9 00   	LDA #$00   
0x03F81A|$0F:$F80A:85 1E   	STA $1E    
0x03F81C|$0F:$F80C:B1 4F   	LDA ($4F),Y	; screen map of background vs. menu tile
0x03F81E|$0F:$F80E:F0 15   	BEQ $F825  	; display background tiles
0x03F820|$0F:$F810:C9 FF   	CMP #$FF   
0x03F822|$0F:$F812:F0 11   	BEQ $F825  	; display background tiles
0x03F824|$0F:$F814:A9 00   	LDA #$00   
; control flow target (from $F806)
0x03F826|$0F:$F816:20 70 F8	JSR $F870  
0x03F829|$0F:$F819:90 0A   	BCC $F825  	; display background tiles
0x03F82B|$0F:$F81B:A9 00   	LDA #$00   
0x03F82D|$0F:$F81D:85 1C   	STA $1C    
0x03F82F|$0F:$F81F:20 AA F9	JSR $F9AA  	; display menu tiles
0x03F832|$0F:$F822:4C 32 F8	JMP $F832  

; control flow target (from $F7F8, $F80E, $F812, $F819)
0x03F835|$0F:$F825:A9 00   	LDA #$00   
0x03F837|$0F:$F827:A4 53   	LDY $53    
0x03F839|$0F:$F829:91 4F   	STA ($4F),Y	; update screen map to show background tiles
0x03F83B|$0F:$F82B:85 1C   	STA $1C    
0x03F83D|$0F:$F82D:85 1E   	STA $1E    
0x03F83F|$0F:$F82F:20 47 F9	JSR $F947  
; menu and background code paths rejoin here
; control flow target (from $F822)
0x03F842|$0F:$F832:C6 18   	DEC $18    
0x03F844|$0F:$F834:C6 18   	DEC $18    
0x03F846|$0F:$F836:C6 53   	DEC $53    
0x03F848|$0F:$F838:10 BA   	BPL $F7F4  
0x03F84A|$0F:$F83A:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03F84D|$0F:$F83D:C0	; $06:$8000

; data -> code
0x03F84E|$0F:$F83E:AD 7C 60	LDA $607C  
0x03F851|$0F:$F841:38      	SEC        
0x03F852|$0F:$F842:E9 10   	SBC #$10   
0x03F854|$0F:$F844:8D 7C 60	STA $607C  
0x03F857|$0F:$F847:A5 4F   	LDA $4F    
0x03F859|$0F:$F849:38      	SEC        
0x03F85A|$0F:$F84A:E9 10   	SBC #$10   
0x03F85C|$0F:$F84C:85 4F   	STA $4F    
0x03F85E|$0F:$F84E:A5 4D   	LDA $4D    
0x03F860|$0F:$F850:85 18   	STA $18    
0x03F862|$0F:$F852:A5 4E   	LDA $4E    
0x03F864|$0F:$F854:85 53   	STA $53    
0x03F866|$0F:$F856:C6 19   	DEC $19    
0x03F868|$0F:$F858:C6 19   	DEC $19    
0x03F86A|$0F:$F85A:C6 54   	DEC $54    
0x03F86C|$0F:$F85C:10 90   	BPL $F7EE  
0x03F86E|$0F:$F85E:A5 35   	LDA $35    	; flag indicating whether any menu is currently open
0x03F870|$0F:$F860:F0 09   	BEQ $F86B  
0x03F872|$0F:$F862:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03F875|$0F:$F865:20 CB D8	JSR $D8CB  
0x03F878|$0F:$F868:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $F860)
0x03F87B|$0F:$F86B:A5 94   	LDA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03F87D|$0F:$F86D:4C D5 C3	JMP $C3D5  	; save A to $05F6, X to $43, and load bank specified by A

; control flow target (from $F816)
0x03F880|$0F:$F870:A8      	TAY        
0x03F881|$0F:$F871:D0 17   	BNE $F88A  
0x03F883|$0F:$F873:A5 54   	LDA $54    
0x03F885|$0F:$F875:AE 9E 60	LDX $609E  	; menu current column
0x03F888|$0F:$F878:C9 04   	CMP #$04   
0x03F88A|$0F:$F87A:B0 1F   	BCS $F89B  
0x03F88C|$0F:$F87C:E0 08   	CPX #$08   
0x03F88E|$0F:$F87E:B0 1B   	BCS $F89B  
0x03F890|$0F:$F880:0A      	ASL        
0x03F891|$0F:$F881:0A      	ASL        
0x03F892|$0F:$F882:0A      	ASL        
0x03F893|$0F:$F883:0A      	ASL        
0x03F894|$0F:$F884:85 10   	STA $10    
0x03F896|$0F:$F886:8A      	TXA        
0x03F897|$0F:$F887:0A      	ASL        
0x03F898|$0F:$F888:65 10   	ADC $10    
; control flow target (from $F871)
0x03F89A|$0F:$F88A:18      	CLC        
0x03F89B|$0F:$F88B:6D FD F8	ADC $F8FD  
0x03F89E|$0F:$F88E:85 10   	STA $10    
0x03F8A0|$0F:$F890:A9 00   	LDA #$00   
0x03F8A2|$0F:$F892:6D FE F8	ADC $F8FE  
0x03F8A5|$0F:$F895:85 11   	STA $11    
0x03F8A7|$0F:$F897:85 1E   	STA $1E    
0x03F8A9|$0F:$F899:D0 3C   	BNE $F8D7  
; control flow target (from $F87A, $F87E)
0x03F8AB|$0F:$F89B:C9 08   	CMP #$08   
0x03F8AD|$0F:$F89D:D0 3A   	BNE $F8D9  
0x03F8AF|$0F:$F89F:AD 92 04	LDA $0492  
0x03F8B2|$0F:$F8A2:F0 35   	BEQ $F8D9  
0x03F8B4|$0F:$F8A4:AD FB F8	LDA $F8FB  
0x03F8B7|$0F:$F8A7:85 10   	STA $10    
0x03F8B9|$0F:$F8A9:AD FC F8	LDA $F8FC  
0x03F8BC|$0F:$F8AC:85 11   	STA $11    
0x03F8BE|$0F:$F8AE:A9 77   	LDA #$77   
0x03F8C0|$0F:$F8B0:8D B5 60	STA $60B5  
0x03F8C3|$0F:$F8B3:8D B6 60	STA $60B6  
0x03F8C6|$0F:$F8B6:85 1E   	STA $1E    
0x03F8C8|$0F:$F8B8:8A      	TXA        
0x03F8C9|$0F:$F8B9:18      	CLC        
0x03F8CA|$0F:$F8BA:69 07   	ADC #$07   
0x03F8CC|$0F:$F8BC:AA      	TAX        
0x03F8CD|$0F:$F8BD:BD F8 06	LDA $06F8,X	; start of main dialogue window
0x03F8D0|$0F:$F8C0:8D B7 60	STA $60B7  
0x03F8D3|$0F:$F8C3:BD F9 06	LDA $06F9,X
0x03F8D6|$0F:$F8C6:8D B8 60	STA $60B8  
0x03F8D9|$0F:$F8C9:E0 15   	CPX #$15   
0x03F8DB|$0F:$F8CB:D0 0A   	BNE $F8D7  
0x03F8DD|$0F:$F8CD:A9 7C   	LDA #$7C   
0x03F8DF|$0F:$F8CF:8D B6 60	STA $60B6  
0x03F8E2|$0F:$F8D2:A9 7B   	LDA #$7B   
0x03F8E4|$0F:$F8D4:8D B8 60	STA $60B8  
; control flow target (from $F899, $F8CB)
0x03F8E7|$0F:$F8D7:38      	SEC        
0x03F8E8|$0F:$F8D8:60      	RTS        

; control flow target (from $F89D, $F8A2)
0x03F8E9|$0F:$F8D9:18      	CLC        
0x03F8EA|$0F:$F8DA:60      	RTS        


; code -> data
; byte 1 sets $0C and ((byte 1) - #$08) << 1 sets $18
; byte 2 sets $0E, ((byte 2) << 4) | (byte 1) sets $607C, ((byte 2) - #$07) << 1 sets $19
; byte 3 sets $53 and $4E
; byte 4 sets $54 and stuff: $18, $4D, $607B
; maybe (X start, Y start, width, height)?
; indexed data load target (from $F79F)
0x03F8EB|$0F:$F8DB:02
; indexed data load target (from $F7AC)
0x03F8EC|$0F:$F8DC:   0D
; indexed data load target (from $F7C2)
0x03F8ED|$0F:$F8DD:      0C
; indexed data load target (from $F7C9)
0x03F8EE|$0F:$F8DE:         03	; anything in the dialogue window area, including the mini-status menu and bottom of the full status menu
0x03F8EF|$0F:$F8DF:02 09 0C 08	; anything in the top area, including main COMMAND/STATUS/SPELL menu
0x03F8F3|$0F:$F8E3:0A 06 03 03	; YES/NO menu
0x03F8F7|$0F:$F8E7:06 09 07 08	; item list in SELL menu
0x03F8FB|$0F:$F8EB:02 0D 0B 04	; bottom battle menu region
0x03F8FF|$0F:$F8EF:02 0D 0B 04	; ???
0x03F903|$0F:$F8F3:02 0D 03 04	; ???
0x03F907|$0F:$F8F7:06 0A 07 09	; EQUIP sub-menu
; data load target (from $F8A4)
0x03F90B|$0F:$F8FB:B5
; data load target (from $F8A9)
0x03F90C|$0F:$F8FC:60
; data load target (from $F88B)
0x03F90D|$0F:$F8FD:FF
; data load target (from $F892)
0x03F90E|$0F:$F8FE:F8
; tiles for redrawing the part of the main COMMAND menu obscured by the EQUIP sub-menu when the EQUIP sub-menu is closed; (only?) read outside of battle
; indirect data load target
0x03F90F|$0F:$F8FF:24 31 5F 5F
0x03F913|$0F:$F903:27 77 5F 5F
0x03F917|$0F:$F907:77 77 5F 5F
0x03F91B|$0F:$F90B:77 7C 5F 7B
0x03F91F|$0F:$F90F:5F 5F 5F 5F
0x03F923|$0F:$F913:36 33 5F 5F
0x03F927|$0F:$F917:28 2F 5F 5F
0x03F92B|$0F:$F91B:2F 7B 5F 7B
0x03F92F|$0F:$F91F:5F 5F 5F 5F
0x03F933|$0F:$F923:2C 37 5F 5F
0x03F937|$0F:$F927:28 30 5F 5F
0x03F93B|$0F:$F92B:5F 7B 5F 7B
0x03F93F|$0F:$F92F:5F 5F 7D 7D
0x03F943|$0F:$F933:28 34 7D 7D
0x03F947|$0F:$F937:38 2C 7D 7D
0x03F94B|$0F:$F93B:33 7B 7D 7E
; indexed data load target (from $FA00, $FA06)
0x03F94F|$0F:$F93F:CB 83	; $02:$83CB
0x03F951|$0F:$F941:6B 84	; $02:$846B
0x03F953|$0F:$F943:33 85	; $02:$8533
0x03F955|$0F:$F945:FB 85	; $02:$85FB

; data -> code
; control flow target (from $F82F)
0x03F957|$0F:$F947:A5 18   	LDA $18    
0x03F959|$0F:$F949:0A      	ASL        
0x03F95A|$0F:$F94A:A5 18   	LDA $18    
0x03F95C|$0F:$F94C:6A      	ROR        
0x03F95D|$0F:$F94D:18      	CLC        
0x03F95E|$0F:$F94E:65 16   	ADC $16    	; current map X-pos (1)
0x03F960|$0F:$F950:85 0C   	STA $0C    
0x03F962|$0F:$F952:A5 19   	LDA $19    
0x03F964|$0F:$F954:0A      	ASL        
0x03F965|$0F:$F955:A5 19   	LDA $19    
0x03F967|$0F:$F957:6A      	ROR        
0x03F968|$0F:$F958:18      	CLC        
0x03F969|$0F:$F959:65 17   	ADC $17    	; current map Y-pos (1)
0x03F96B|$0F:$F95B:85 0E   	STA $0E    
0x03F96D|$0F:$F95D:20 89 DF	JSR $DF89  
0x03F970|$0F:$F960:20 22 E2	JSR $E222  
0x03F973|$0F:$F963:A5 1D   	LDA $1D    
0x03F975|$0F:$F965:C5 0D   	CMP $0D    
0x03F977|$0F:$F967:F0 22   	BEQ $F98B  
0x03F979|$0F:$F969:A5 0C   	LDA $0C    
0x03F97B|$0F:$F96B:C9 28   	CMP #$28   
0x03F97D|$0F:$F96D:B0 1C   	BCS $F98B  
0x03F97F|$0F:$F96F:A5 1D   	LDA $1D    
0x03F981|$0F:$F971:D0 14   	BNE $F987  
0x03F983|$0F:$F973:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03F985|$0F:$F975:C9 01   	CMP #$01   
0x03F987|$0F:$F977:F0 0A   	BEQ $F983  
0x03F989|$0F:$F979:A5 0C   	LDA $0C    
0x03F98B|$0F:$F97B:C9 08   	CMP #$08   
0x03F98D|$0F:$F97D:90 04   	BCC $F983  
0x03F98F|$0F:$F97F:C9 0C   	CMP #$0C   
0x03F991|$0F:$F981:90 08   	BCC $F98B  
; control flow target (from $F977, $F97D)
0x03F993|$0F:$F983:A9 20   	LDA #$20   
0x03F995|$0F:$F985:D0 02   	BNE $F989  
; control flow target (from $F971)
0x03F997|$0F:$F987:A9 24   	LDA #$24   
; control flow target (from $F985)
0x03F999|$0F:$F989:85 0C   	STA $0C    
; control flow target (from $F967, $F96D, $F981)
0x03F99B|$0F:$F98B:A5 1C   	LDA $1C    
0x03F99D|$0F:$F98D:C9 FF   	CMP #$FF   
0x03F99F|$0F:$F98F:D0 07   	BNE $F998  
0x03F9A1|$0F:$F991:A5 0C   	LDA $0C    
0x03F9A3|$0F:$F993:C9 20   	CMP #$20   
0x03F9A5|$0F:$F995:90 0C   	BCC $F9A3  
0x03F9A7|$0F:$F997:60      	RTS        

; control flow target (from $F98F)
0x03F9A8|$0F:$F998:C9 FE   	CMP #$FE   
0x03F9AA|$0F:$F99A:D0 0B   	BNE $F9A7  
0x03F9AC|$0F:$F99C:A5 0C   	LDA $0C    
0x03F9AE|$0F:$F99E:C9 20   	CMP #$20   
0x03F9B0|$0F:$F9A0:B0 01   	BCS $F9A3  
0x03F9B2|$0F:$F9A2:60      	RTS        

; control flow target (from $F995, $F9A0)
0x03F9B3|$0F:$F9A3:A9 00   	LDA #$00   
0x03F9B5|$0F:$F9A5:85 1C   	STA $1C    
; control flow target (from $F99A)
0x03F9B7|$0F:$F9A7:20 F6 F9	JSR $F9F6  
; control flow target (from $F81F)
0x03F9BA|$0F:$F9AA:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03F9BD|$0F:$F9AD:A0 00   	LDY #$00   
0x03F9BF|$0F:$F9AF:8C 9F 60	STY $609F  	; menu current row
0x03F9C2|$0F:$F9B2:B1 10   	LDA ($10),Y
0x03F9C4|$0F:$F9B4:20 0E FA	JSR $FA0E  
0x03F9C7|$0F:$F9B7:C8      	INY        
0x03F9C8|$0F:$F9B8:B1 10   	LDA ($10),Y
0x03F9CA|$0F:$F9BA:20 0E FA	JSR $FA0E  
0x03F9CD|$0F:$F9BD:C8      	INY        
0x03F9CE|$0F:$F9BE:CE 9E 60	DEC $609E  	; menu current column
0x03F9D1|$0F:$F9C1:CE 9E 60	DEC $609E  	; menu current column
0x03F9D4|$0F:$F9C4:A9 01   	LDA #$01   
0x03F9D6|$0F:$F9C6:8D 9F 60	STA $609F  	; menu current row
0x03F9D9|$0F:$F9C9:B1 10   	LDA ($10),Y
0x03F9DB|$0F:$F9CB:20 0E FA	JSR $FA0E  
0x03F9DE|$0F:$F9CE:C8      	INY        
0x03F9DF|$0F:$F9CF:B1 10   	LDA ($10),Y
0x03F9E1|$0F:$F9D1:20 0E FA	JSR $FA0E  
0x03F9E4|$0F:$F9D4:C8      	INY        
0x03F9E5|$0F:$F9D5:A9 00   	LDA #$00   
0x03F9E7|$0F:$F9D7:A6 1E   	LDX $1E    
0x03F9E9|$0F:$F9D9:D0 04   	BNE $F9DF  
0x03F9EB|$0F:$F9DB:B1 10   	LDA ($10),Y
0x03F9ED|$0F:$F9DD:29 03   	AND #$03   
; control flow target (from $F9D9)
0x03F9EF|$0F:$F9DF:48      	PHA        
0x03F9F0|$0F:$F9E0:AD 9E 60	LDA $609E  	; menu current column
0x03F9F3|$0F:$F9E3:38      	SEC        
0x03F9F4|$0F:$F9E4:E9 02   	SBC #$02   
0x03F9F6|$0F:$F9E6:4A      	LSR        
0x03F9F7|$0F:$F9E7:AA      	TAX        
0x03F9F8|$0F:$F9E8:68      	PLA        
0x03F9F9|$0F:$F9E9:9D 6B 60	STA $606B,X
0x03F9FC|$0F:$F9EC:AD 9E 60	LDA $609E  	; menu current column
0x03F9FF|$0F:$F9EF:38      	SEC        
0x03FA00|$0F:$F9F0:E9 04   	SBC #$04   
0x03FA02|$0F:$F9F2:8D 9E 60	STA $609E  	; menu current column
0x03FA05|$0F:$F9F5:60      	RTS        

; control flow target (from $F9A7)
0x03FA06|$0F:$F9F6:A5 1F   	LDA $1F    	; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu)
0x03FA08|$0F:$F9F8:0A      	ASL        
0x03FA09|$0F:$F9F9:A8      	TAY        
0x03FA0A|$0F:$F9FA:A5 0C   	LDA $0C    
0x03FA0C|$0F:$F9FC:0A      	ASL        
0x03FA0D|$0F:$F9FD:0A      	ASL        
0x03FA0E|$0F:$F9FE:65 0C   	ADC $0C    
0x03FA10|$0F:$FA00:79 3F F9	ADC $F93F,Y
0x03FA13|$0F:$FA03:85 10   	STA $10    
0x03FA15|$0F:$FA05:C8      	INY        
0x03FA16|$0F:$FA06:B9 3F F9	LDA $F93F,Y
0x03FA19|$0F:$FA09:69 00   	ADC #$00   
0x03FA1B|$0F:$FA0B:85 11   	STA $11    
0x03FA1D|$0F:$FA0D:60      	RTS        

; control flow target (from $F9B4, $F9BA, $F9CB, $F9D1)
0x03FA1E|$0F:$FA0E:48      	PHA        
0x03FA1F|$0F:$FA0F:A2 00   	LDX #$00   
0x03FA21|$0F:$FA11:AD 9F 60	LDA $609F  	; menu current row
0x03FA24|$0F:$FA14:F0 06   	BEQ $FA1C  
0x03FA26|$0F:$FA16:A5 4E   	LDA $4E    
0x03FA28|$0F:$FA18:0A      	ASL        
0x03FA29|$0F:$FA19:69 02   	ADC #$02   
0x03FA2B|$0F:$FA1B:AA      	TAX        
; control flow target (from $FA14)
0x03FA2C|$0F:$FA1C:8A      	TXA        
0x03FA2D|$0F:$FA1D:18      	CLC        
0x03FA2E|$0F:$FA1E:6D 9E 60	ADC $609E  	; menu current column
0x03FA31|$0F:$FA21:AA      	TAX        
0x03FA32|$0F:$FA22:68      	PLA        
0x03FA33|$0F:$FA23:9D 0B 60	STA $600B,X
0x03FA36|$0F:$FA26:EE 9E 60	INC $609E  	; menu current column
0x03FA39|$0F:$FA29:60      	RTS        

; display string ID specified by next byte
; control flow target (from $C856, $CC0A, $D160)
; external control flow target (from $06:$80D6, $06:$8BBD, $06:$8BF8, $06:$8C18, $06:$8CCD, $06:$947F, $06:$94ED, $06:$94FB, $06:$950E, $06:$9515, $06:$9534, $06:$9538, $06:$9BEB, $06:$9C5B, $06:$A228, $07:$8377, $07:$8591)
0x03FA3A|$0F:$FA2A:A2 00   	LDX #$00   
0x03FA3C|$0F:$FA2C:F0 06   	BEQ $FA34  
; display string ID specified by next byte + #$0100
; external control flow target (from $02:$B2D2, $06:$8102, $06:$810B, $06:$8246, $06:$828D, $06:$8291, $06:$8298, $06:$829C, $06:$82CE, $06:$82D5, $06:$82EA, $06:$82FF, $06:$830A, $06:$8327, $06:$8341, $06:$8348, $06:$8358, $06:$835C, $06:$837C, $06:$83B2, $06:$83B9, $06:$83C4, $06:$83E7, $06:$83FF, $06:$840D, $06:$8423, $06:$843B, $06:$843F, $06:$844A, $06:$8451, $06:$8465, $06:$847E, $06:$848C, $06:$84B0, $06:$84B7, $06:$84FE, $06:$8502, $06:$8514, $06:$851F, $06:$8532, $06:$8547, $06:$8557, $06:$8563, $06:$856A, $06:$8585, $06:$859C, $06:$85AB, $06:$85CE, $06:$85F3, $06:$8602, $06:$8627, $06:$8641, $06:$8650, $06:$8672, $06:$8679, $06:$8694, $06:$869D, $06:$86CB, $06:$86DE, $06:$86EA, $06:$86F5, $06:$86FC, $06:$8707, $06:$871F, $06:$8738, $06:$8AB6, $06:$8ADC, $06:$8AF8, $06:$8B4E, $06:$8B62, $06:$8C3C, $06:$8C8D, $06:$91DC, $06:$9529, $06:$9577, $06:$95A0, $06:$95C9, $06:$963D, $06:$9647, $06:$965A, $06:$9668, $06:$9673, $06:$9685, $06:$96C9, $06:$96D7, $06:$96F2, $06:$96FE, $06:$973C, $06:$9750, $06:$979A, $06:$97ED, $06:$97F8, $06:$9805, $06:$9813, $06:$981E, $06:$988E, $06:$98CB, $06:$9903, $06:$9908, $06:$990F, $06:$992F, $06:$993B, $06:$995E, $06:$9963, $06:$999C, $06:$99A3, $06:$99BA, $06:$99E8, $06:$99F5, $06:$99F9, $06:$9A10, $06:$9A29, $06:$9A5B, $06:$9A62, $06:$9A72, $06:$9A7D, $06:$9AA2, $06:$9AAF, $06:$9ABD, $06:$9AC4, $06:$9AF4, $06:$9B7D, $06:$9B8A, $06:$9B92, $06:$9BAF, $06:$9BB3, $06:$9BBA, $06:$9BFE, $06:$9C30, $06:$9C62, $06:$9CAA, $06:$9CBA, $06:$9CC5, $06:$9CD2, $06:$9CF9, $06:$9D0E, $06:$9D30, $06:$9D3F, $06:$A24B, $06:$BB57, $06:$BB5B, $06:$BB67, $06:$BB73, $06:$BB7C, $06:$BBAF, $06:$BBD3, $06:$BC26)
0x03FA3E|$0F:$FA2E:A2 20   	LDX #$20   
0x03FA40|$0F:$FA30:D0 02   	BNE $FA34  
; display string ID specified by next byte + #$0200
; control flow target (from $CA35)
; external control flow target (from $02:$B2EB, $06:$8163, $06:$83D5, $06:$841A, $06:$8E39, $06:$8E3D, $06:$8ED5, $06:$8EF6, $06:$8EFA, $06:$8F05, $06:$8F11, $06:$8F1C, $06:$8F29, $06:$8F32, $06:$8F47, $06:$8F58, $06:$8F63, $06:$8F94, $06:$8FB1, $06:$8FD7, $06:$8FEF, $06:$8FFE, $06:$9002, $06:$9012, $06:$9028, $06:$9055, $06:$905E, $06:$9065, $06:$907C, $06:$908E, $06:$909A, $06:$90A1, $06:$90BF, $06:$9102, $06:$910B, $06:$9117, $06:$916E, $06:$917E, $06:$9185, $06:$9190, $06:$91A8, $06:$91B3, $06:$91D0, $06:$91E6, $06:$91ED, $06:$91FA, $06:$9201, $06:$920C, $06:$9213, $06:$928B, $06:$9292, $06:$92E7, $06:$930B, $06:$933E, $06:$9348, $06:$9384, $06:$93EB, $06:$93F2, $06:$93F9, $06:$9407, $06:$9437, $06:$9446, $06:$9458, $06:$945F, $06:$9486, $06:$9817, $06:$A2E5, $06:$BD37, $06:$BD56)
0x03FA42|$0F:$FA32:A2 40   	LDX #$40   
; control flow target (from $FA2C, $FA30)
0x03FA44|$0F:$FA34:68      	PLA        	; low byte of return address
0x03FA45|$0F:$FA35:18      	CLC        
0x03FA46|$0F:$FA36:69 01   	ADC #$01   	; increment it (byte following the JSR is data)
0x03FA48|$0F:$FA38:85 0E   	STA $0E    	; store to $0E
0x03FA4A|$0F:$FA3A:68      	PLA        	; high byte of return address
0x03FA4B|$0F:$FA3B:69 00   	ADC #$00   	; add carry from incrementing low byte
0x03FA4D|$0F:$FA3D:85 0F   	STA $0F    	; store to $0F
0x03FA4F|$0F:$FA3F:48      	PHA        	; push the new return address's high byte
0x03FA50|$0F:$FA40:A5 0E   	LDA $0E    
0x03FA52|$0F:$FA42:48      	PHA        	; push the new return address's low byte
0x03FA53|$0F:$FA43:A0 00   	LDY #$00   
0x03FA55|$0F:$FA45:B1 0E   	LDA ($0E),Y	; load the byte following the original JSR
0x03FA57|$0F:$FA47:4C 54 FA	JMP $FA54  

; display string ID specified by A
; control flow target (from $D196, $F6ED)
; external control flow target (from $04:$97F4, $04:$98C3, $04:$9CC7, $06:$94B8, $06:$94CB, $06:$94DE, $06:$A99F)
0x03FA5A|$0F:$FA4A:A2 00   	LDX #$00   
0x03FA5C|$0F:$FA4C:F0 06   	BEQ $FA54  
; display string ID specified by A + #$0100
; control flow target (from $F6F3)
; external control flow target (from $02:$B334, $04:$9CC4, $06:$95D8, $06:$97E3, $06:$98AC, $06:$98C7, $06:$992B, $06:$9A41, $06:$9B2D, $06:$9D49, $06:$A0CF)
0x03FA5E|$0F:$FA4E:A2 20   	LDX #$20   
0x03FA60|$0F:$FA50:D0 02   	BNE $FA54  
; display string ID specified by A + #$0200
; control flow target (from $F6F9)
; external control flow target (from $06:$8E30, $06:$8E51, $06:$8E64, $06:$8F7F, $06:$8FA6, $06:$8FC6, $06:$9039, $06:$90B9, $06:$90E9, $06:$90FC, $06:$9147, $06:$9168, $06:$9248, $06:$92F8, $06:$9326, $06:$9338, $06:$9359, $06:$9395, $06:$93B8, $06:$93DB)
0x03FA62|$0F:$FA52:A2 40   	LDX #$40   
; control flow target (from $FA47, $FA4C, $FA50)
0x03FA64|$0F:$FA54:20 68 FA	JSR $FA68  	; figure out which bank the string is in, scan to start of string
0x03FA67|$0F:$FA57:20 A7 FA	JSR $FAA7  	; initialize text engine variables
; control flow target (from $FA63)
0x03FA6A|$0F:$FA5A:20 24 FB	JSR $FB24  
0x03FA6D|$0F:$FA5D:20 63 FB	JSR $FB63  
0x03FA70|$0F:$FA60:20 C8 FA	JSR $FAC8  	; CLC if we've read an end token, otherwise (probably?) print word to screen and SEC
0x03FA73|$0F:$FA63:90 F5   	BCC $FA5A  
0x03FA75|$0F:$FA65:4C C2 F6	JMP $F6C2  	; load bank specified by $94

; figure out which bank the string is in, scan to start of string
; control flow target (from $FA54)
0x03FA78|$0F:$FA68:20 6E FA	JSR $FA6E  	; text engine: determine which ROM bank to load based on string index
0x03FA7B|$0F:$FA6B:4C 8A FA	JMP $FA8A  	; given a string ID in X (high, << 5) + A (low), scan to start of string

; text engine: determine which ROM bank to load based on string index
; IN:
; A = low byte of string index
; X = high byte of string index << 5 (for easy adding later)
; Y and C irrelevant
;  
; OUT: no change to A or X
; Y = index of ROM bank to swap in to read the string from
; C not used, but does indicate whether we ended up choosing bank 5 (clear) or 2 (set)
; control flow target (from $FA68)
0x03FA7E|$0F:$FA6E:A0 05   	LDY #$05   	; default to bank 5
0x03FA80|$0F:$FA70:48      	PHA        	; save the original string index in A
0x03FA81|$0F:$FA71:29 F0   	AND #$F0   	; useless op
0x03FA83|$0F:$FA73:4A      	LSR        
0x03FA84|$0F:$FA74:4A      	LSR        
0x03FA85|$0F:$FA75:4A      	LSR        
0x03FA86|$0F:$FA76:4A      	LSR        
0x03FA87|$0F:$FA77:85 10   	STA $10    	; 16 strings per pointer, so low byte of string index >> 4 = low nybble of pointer index
0x03FA89|$0F:$FA79:8A      	TXA        
0x03FA8A|$0F:$FA7A:29 E0   	AND #$E0   
0x03FA8C|$0F:$FA7C:4A      	LSR        	; A = high nybble of pointer index
0x03FA8D|$0F:$FA7D:05 10   	ORA $10    	; glue the high and low nybbles of the pointer index together into a single byte
0x03FA8F|$0F:$FA7F:C9 2E   	CMP #$2E   
0x03FA91|$0F:$FA81:90 02   	BCC $FA85  	; if the pointer index < #$2E, keep the bank 5 default
0x03FA93|$0F:$FA83:A0 02   	LDY #$02   	; if the pointer index >= #$2E, load bank 2 instead
; control flow target (from $FA81)
0x03FA95|$0F:$FA85:8C C6 60	STY $60C6  	; ROM bank containing the desired text string
0x03FA98|$0F:$FA88:68      	PLA        	; restore the original string index in A
; control flow target (from $D12B)
; external control flow target (from $06:$9542, $06:$9550)
0x03FA99|$0F:$FA89:60      	RTS        

; given a string ID in X (high, << 5) + A (low), scan to start of string
; control flow target (from $FA6B)
0x03FA9A|$0F:$FA8A:20 70 F7	JSR $F770  	; load ROM bank #$02
0x03FA9D|$0F:$FA8D:86 11   	STX $11    	; save high byte of string index to $11
0x03FA9F|$0F:$FA8F:85 10   	STA $10    	; save low byte of string index to $10
0x03FAA1|$0F:$FA91:4A      	LSR        	; 16 strings per 2-byte pointer = >> 4 + << 1 a.k.a. >> 3 + & #$1E
0x03FAA2|$0F:$FA92:4A      	LSR        
0x03FAA3|$0F:$FA93:4A      	LSR        
0x03FAA4|$0F:$FA94:29 1E   	AND #$1E   
0x03FAA6|$0F:$FA96:18      	CLC        
0x03FAA7|$0F:$FA97:65 11   	ADC $11    	; add high byte of string index to get pointer index
0x03FAA9|$0F:$FA99:A8      	TAY        
0x03FAAA|$0F:$FA9A:B9 52 B7	LDA $B752,Y	; -> $05:$8000: main script strings, part 1
0x03FAAD|$0F:$FA9D:85 55   	STA $55    	; pointer to start of sub pointer data, low byte
0x03FAAF|$0F:$FA9F:B9 53 B7	LDA $B753,Y
0x03FAB2|$0F:$FAA2:85 56   	STA $56    	; pointer to start of sub pointer data, high byte
0x03FAB4|$0F:$FAA4:4C B3 FD	JMP $FDB3  	; scan through group of strings until we find the start of the desired string

; initialize text engine variables
; control flow target (from $FA57)
0x03FAB7|$0F:$FAA7:A9 00   	LDA #$00   
0x03FAB9|$0F:$FAA9:8D C8 60	STA $60C8  	; speech sound effect / auto-indent flag
0x03FABC|$0F:$FAAC:8D CA 60	STA $60CA  	; unused text engine variable
0x03FABF|$0F:$FAAF:8D CC 60	STA $60CC  	; text engine end token flag
0x03FAC2|$0F:$FAB2:8D C9 60	STA $60C9  	; count (only used as flag) of interpolated variable bytes read from $60F1
0x03FAC5|$0F:$FAB5:8D D2 60	STA $60D2  	; read index within current dictionary entry
0x03FAC8|$0F:$FAB8:A9 08   	LDA #$08   
0x03FACA|$0F:$FABA:8D C7 60	STA $60C7  
0x03FACD|$0F:$FABD:A5 7C   	LDA $7C    
0x03FACF|$0F:$FABF:8D CE 60	STA $60CE  
0x03FAD2|$0F:$FAC2:A5 7D   	LDA $7D    
0x03FAD4|$0F:$FAC4:8D CF 60	STA $60CF  
0x03FAD7|$0F:$FAC7:60      	RTS        

; CLC if we've read an end token, otherwise (probably?) print word to screen and SEC
; control flow target (from $FA60)
0x03FAD8|$0F:$FAC8:AD CC 60	LDA $60CC  	; text engine end token flag
0x03FADB|$0F:$FACB:D0 02   	BNE $FACF  
0x03FADD|$0F:$FACD:18      	CLC        
0x03FADE|$0F:$FACE:60      	RTS        

; control flow target (from $FACB)
0x03FADF|$0F:$FACF:A6 7D   	LDX $7D    
0x03FAE1|$0F:$FAD1:AD D0 60	LDA $60D0  
0x03FAE4|$0F:$FAD4:D0 03   	BNE $FAD9  
0x03FAE6|$0F:$FAD6:8E D0 60	STX $60D0  
; control flow target (from $FAD4)
0x03FAE9|$0F:$FAD9:AD D1 60	LDA $60D1  
0x03FAEC|$0F:$FADC:D0 03   	BNE $FAE1  
0x03FAEE|$0F:$FADE:8E D1 60	STX $60D1  
; control flow target (from $FADC)
0x03FAF1|$0F:$FAE1:A5 8E   	LDA $8E    	; flag for in battle or not (#$FF)?
0x03FAF3|$0F:$FAE3:10 26   	BPL $FB0B  
0x03FAF5|$0F:$FAE5:A5 7D   	LDA $7D    
0x03FAF7|$0F:$FAE7:C9 01   	CMP #$01   
0x03FAF9|$0F:$FAE9:F0 01   	BEQ $FAEC  
0x03FAFB|$0F:$FAEB:4A      	LSR        
; control flow target (from $FAE9)
0x03FAFC|$0F:$FAEC:18      	CLC        
0x03FAFD|$0F:$FAED:69 01   	ADC #$01   
0x03FAFF|$0F:$FAEF:85 9C   	STA $9C    
; control flow target (from $FB08)
0x03FB01|$0F:$FAF1:38      	SEC        
0x03FB02|$0F:$FAF2:A5 7D   	LDA $7D    
0x03FB04|$0F:$FAF4:ED CF 60	SBC $60CF  
0x03FB07|$0F:$FAF7:90 12   	BCC $FB0B  
0x03FB09|$0F:$FAF9:F0 10   	BEQ $FB0B  
0x03FB0B|$0F:$FAFB:C9 01   	CMP #$01   
0x03FB0D|$0F:$FAFD:F0 03   	BEQ $FB02  
0x03FB0F|$0F:$FAFF:20 0D FB	JSR $FB0D  
; control flow target (from $FAFD)
0x03FB12|$0F:$FB02:20 0D FB	JSR $FB0D  
0x03FB15|$0F:$FB05:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03FB18|$0F:$FB08:4C F1 FA	JMP $FAF1  

; control flow target (from $FAE3, $FAF7, $FAF9)
0x03FB1B|$0F:$FB0B:38      	SEC        
0x03FB1C|$0F:$FB0C:60      	RTS        

; control flow target (from $FAFF, $FB02)
0x03FB1D|$0F:$FB0D:AD CF 60	LDA $60CF  
0x03FB20|$0F:$FB10:48      	PHA        
0x03FB21|$0F:$FB11:EE CF 60	INC $60CF  
0x03FB24|$0F:$FB14:20 A2 FD	JSR $FDA2  	; 16-bit multiplication: set 16-bit ($10-$11) = A * #$16; returns low byte in A and clears C
0x03FB27|$0F:$FB17:8D 85 60	STA $6085  
0x03FB2A|$0F:$FB1A:68      	PLA        
0x03FB2B|$0F:$FB1B:18      	CLC        
0x03FB2C|$0F:$FB1C:69 13   	ADC #$13   
0x03FB2E|$0F:$FB1E:8D 84 60	STA $6084  
0x03FB31|$0F:$FB21:4C 0F FD	JMP $FD0F  

; control flow target (from $FA5A)
0x03FB34|$0F:$FB24:20 B8 FB	JSR $FBB8  	; read a main script word into word buffer $60D9
0x03FB37|$0F:$FB27:2C CA 60	BIT $60CA  	; unused text engine variable
0x03FB3A|$0F:$FB2A:30 36   	BMI $FB62  
0x03FB3C|$0F:$FB2C:A5 7C   	LDA $7C    
0x03FB3E|$0F:$FB2E:8D 9E 60	STA $609E  	; menu current column
0x03FB41|$0F:$FB31:A9 00   	LDA #$00   
0x03FB43|$0F:$FB33:8D 89 60	STA $6089  	; string word buffer index 2
; control flow target (from $FB4E)
0x03FB46|$0F:$FB36:AE 89 60	LDX $6089  	; string word buffer index 2
0x03FB49|$0F:$FB39:BD D9 60	LDA $60D9,X	; start of string word buffer
0x03FB4C|$0F:$FB3C:EE 89 60	INC $6089  	; string word buffer index 2
0x03FB4F|$0F:$FB3F:C9 5F   	CMP #$5F   	; [space]
0x03FB51|$0F:$FB41:F0 0D   	BEQ $FB50  
0x03FB53|$0F:$FB43:C9 FA   	CMP #$FA   	; [end-FA]
0x03FB55|$0F:$FB45:B0 09   	BCS $FB50  
0x03FB57|$0F:$FB47:EE 9E 60	INC $609E  	; menu current column
0x03FB5A|$0F:$FB4A:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FB5D|$0F:$FB4D:45	; $02:$800A; -> $02:$B677: CLC if end of word, SEC otherwise

; data -> code
0x03FB5E|$0F:$FB4E:B0 E6   	BCS $FB36  
; control flow target (from $FB41, $FB45)
0x03FB60|$0F:$FB50:CE 9E 60	DEC $609E  	; menu current column
0x03FB63|$0F:$FB53:AD 9E 60	LDA $609E  	; menu current column
0x03FB66|$0F:$FB56:10 06   	BPL $FB5E  
0x03FB68|$0F:$FB58:AD C8 60	LDA $60C8  	; speech sound effect / auto-indent flag
0x03FB6B|$0F:$FB5B:8D 9E 60	STA $609E  	; menu current column
; control flow target (from $FB56)
0x03FB6E|$0F:$FB5E:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FB71|$0F:$FB61:47	; $02:$800E; -> $02:$B687: if menu current column < #$16, CLC and RTS, otherwise do stuff

; data -> code
; control flow target (from $FB2A)
0x03FB72|$0F:$FB62:60      	RTS        

; control flow target (from $FA5D)
0x03FB73|$0F:$FB63:A2 00   	LDX #$00   
0x03FB75|$0F:$FB65:8E CB 60	STX $60CB  	; string word buffer index 1
; control flow target (from $FB7E)
0x03FB78|$0F:$FB68:AE CB 60	LDX $60CB  	; string word buffer index 1
0x03FB7B|$0F:$FB6B:BD D9 60	LDA $60D9,X	; start of string word buffer
0x03FB7E|$0F:$FB6E:EE CB 60	INC $60CB  	; string word buffer index 1
0x03FB81|$0F:$FB71:C9 FA   	CMP #$FA   
0x03FB83|$0F:$FB73:B0 0C   	BCS $FB81  
0x03FB85|$0F:$FB75:48      	PHA        
0x03FB86|$0F:$FB76:20 37 FD	JSR $FD37  
0x03FB89|$0F:$FB79:68      	PLA        
0x03FB8A|$0F:$FB7A:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FB8D|$0F:$FB7D:45	; $02:$800A; -> $02:$B677: CLC if end of word, SEC otherwise

; data -> code
0x03FB8E|$0F:$FB7E:B0 E8   	BCS $FB68  
0x03FB90|$0F:$FB80:60      	RTS        

; control flow target (from $FB73)
0x03FB91|$0F:$FB81:C9 FB   	CMP #$FB   	; [wait]; implies [line]
0x03FB93|$0F:$FB83:F0 12   	BEQ $FB97  
0x03FB95|$0F:$FB85:C9 FC   	CMP #$FC   	; [end-FC]
0x03FB97|$0F:$FB87:F0 24   	BEQ $FBAD  
0x03FB99|$0F:$FB89:C9 FD   	CMP #$FD   
0x03FB9B|$0F:$FB8B:F0 1B   	BEQ $FBA8  
0x03FB9D|$0F:$FB8D:C9 FE   	CMP #$FE   	; [line]
0x03FB9F|$0F:$FB8F:F0 12   	BEQ $FBA3  
; set text engine end token flag $60CC and RTS
; FA/FF handler + end of FC handler
; control flow target (from $FBB5)
0x03FBA1|$0F:$FB91:A9 FF   	LDA #$FF   
0x03FBA3|$0F:$FB93:8D CC 60	STA $60CC  	; text engine end token flag
0x03FBA6|$0F:$FB96:60      	RTS        

; FB handler: [wait]
; control flow target (from $FB83)
0x03FBA7|$0F:$FB97:A5 8E   	LDA $8E    	; flag for in battle or not (#$FF)?
0x03FBA9|$0F:$FB99:30 0C   	BMI $FBA7  
0x03FBAB|$0F:$FB9B:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FBAE|$0F:$FB9E:46	; $02:$800C

; data -> code
0x03FBAF|$0F:$FB9F:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FBB2|$0F:$FBA2:48	; $02:$8010

; data -> code
; FE handler: [line]
; control flow target (from $FB8F)
0x03FBB3|$0F:$FBA3:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FBB6|$0F:$FBA6:46	; $02:$800C

; data -> code
; control flow target (from $FB99)
0x03FBB7|$0F:$FBA7:60      	RTS        

; FD handler
; control flow target (from $FB8B)
0x03FBB8|$0F:$FBA8:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FBBB|$0F:$FBAB:40	; $02:$8000; -> $02:$B68F: handler for control code #$FD

; data -> code
0x03FBBC|$0F:$FBAC:60      	RTS        

; FC handler: [end-FC]
; control flow target (from $FB87)
0x03FBBD|$0F:$FBAD:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FBC0|$0F:$FBB0:46	; $02:$800C

; data -> code
0x03FBC1|$0F:$FBB1:A9 00   	LDA #$00   
0x03FBC3|$0F:$FBB3:85 7C   	STA $7C    
0x03FBC5|$0F:$FBB5:4C 91 FB	JMP $FB91  	; set text engine end token flag $60CC and RTS

; read a main script word into word buffer $60D9
; control flow target (from $FB24)
0x03FBC8|$0F:$FBB8:A9 00   	LDA #$00   
0x03FBCA|$0F:$FBBA:8D CB 60	STA $60CB  	; string word buffer index 1
; control flow target (from $FBDA)
0x03FBCD|$0F:$FBBD:20 DD FB	JSR $FBDD  	; return next byte of string in A
0x03FBD0|$0F:$FBC0:C9 FE   	CMP #$FE   	; useless op
0x03FBD2|$0F:$FBC2:D0 00   	BNE $FBC4  	; useless op
; control flow target (from $FBC2)
0x03FBD4|$0F:$FBC4:C9 65   	CMP #$65   	; "‘"
0x03FBD6|$0F:$FBC6:D0 05   	BNE $FBCD  	; "‘" enables speech sound effect
0x03FBD8|$0F:$FBC8:A2 01   	LDX #$01   
0x03FBDA|$0F:$FBCA:8E C8 60	STX $60C8  	; speech sound effect / auto-indent flag
; control flow target (from $FBC6)
0x03FBDD|$0F:$FBCD:AE CB 60	LDX $60CB  	; string word buffer index 1
0x03FBE0|$0F:$FBD0:9D D9 60	STA $60D9,X	; start of string word buffer
0x03FBE3|$0F:$FBD3:EE CB 60	INC $60CB  	; string word buffer index 1
0x03FBE6|$0F:$FBD6:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FBE9|$0F:$FBD9:45	; $02:$800A; -> $02:$B677: CLC if end of word, SEC otherwise

; data -> code
0x03FBEA|$0F:$FBDA:B0 E1   	BCS $FBBD  	; if not end of word, keep reading more string bytes
0x03FBEC|$0F:$FBDC:60      	RTS        

; return next byte of string in A
; control flow target (from $FBBD)
0x03FBED|$0F:$FBDD:AE C9 60	LDX $60C9  	; count (only used as flag) of interpolated variable bytes read from $60F1
0x03FBF0|$0F:$FBE0:F0 12   	BEQ $FBF4  	; if we're not in "read from $60F1" mode, read next string byte from ROM
; control flow target (from $FBFC)
0x03FBF2|$0F:$FBE2:BD F1 60	LDA $60F1,X	; start of text variable buffer
0x03FBF5|$0F:$FBE5:EE C9 60	INC $60C9  	; count (only used as flag) of interpolated variable bytes read from $60F1
0x03FBF8|$0F:$FBE8:C9 FA   	CMP #$FA   	; [end-FA]
0x03FBFA|$0F:$FBEA:D0 07   	BNE $FBF3  	; if not [end-FA], use it
0x03FBFC|$0F:$FBEC:A2 00   	LDX #$00   	; otherwise reset read index and "read from $60F1" flag
0x03FBFE|$0F:$FBEE:8E C9 60	STX $60C9  	; count (only used as flag) of interpolated variable bytes read from $60F1
0x03FC01|$0F:$FBF1:F0 01   	BEQ $FBF4  	; and read next string token from ROM
; control flow target (from $FBEA, $FBF8)
0x03FC03|$0F:$FBF3:60      	RTS        

; control flow target (from $FBE0, $FBF1)
0x03FC04|$0F:$FBF4:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FC07|$0F:$FBF7:4A	; $02:$8014; -> $02:$BE00: read the next text token and interpolate any variable control codes; SEC to trigger read of [end-FA]-terminated string from $60F1, CLC to use A

; data -> code
0x03FC08|$0F:$FBF8:90 F9   	BCC $FBF3  	; CLC means to use value in A, so RTS
0x03FC0A|$0F:$FBFA:A2 00   	LDX #$00   	; else, SEC means to read from $60F1, so initialize read index to #$00
0x03FC0C|$0F:$FBFC:4C E2 FB	JMP $FBE2  	; and start reading

; external control flow target (from $04:$9ADB, $04:$9B46)
0x03FC0F|$0F:$FBFF:29 0F   	AND #$0F   
0x03FC11|$0F:$FC01:C9 0F   	CMP #$0F   
0x03FC13|$0F:$FC03:F0 0E   	BEQ $FC13  
0x03FC15|$0F:$FC05:C9 0E   	CMP #$0E   
0x03FC17|$0F:$FC07:F0 14   	BEQ $FC1D  
0x03FC19|$0F:$FC09:C9 0C   	CMP #$0C   
0x03FC1B|$0F:$FC0B:D0 06   	BNE $FC13  
0x03FC1D|$0F:$FC0D:AD D1 60	LDA $60D1  
0x03FC20|$0F:$FC10:4C 25 FC	JMP $FC25  

; control flow target (from $FC03, $FC0B)
0x03FC23|$0F:$FC13:A9 00   	LDA #$00   
0x03FC25|$0F:$FC15:8D D0 60	STA $60D0  
0x03FC28|$0F:$FC18:8D D1 60	STA $60D1  
0x03FC2B|$0F:$FC1B:F0 08   	BEQ $FC25  
; control flow target (from $FC07)
0x03FC2D|$0F:$FC1D:A9 00   	LDA #$00   
0x03FC2F|$0F:$FC1F:8D D1 60	STA $60D1  
0x03FC32|$0F:$FC22:AD D0 60	LDA $60D0  
; control flow target (from $FC10, $FC1B)
0x03FC35|$0F:$FC25:85 7D   	STA $7D    
0x03FC37|$0F:$FC27:0A      	ASL        
0x03FC38|$0F:$FC28:69 02   	ADC #$02   
0x03FC3A|$0F:$FC2A:85 00   	STA $00    
0x03FC3C|$0F:$FC2C:A9 00   	LDA #$00   
0x03FC3E|$0F:$FC2E:85 7C   	STA $7C    
; control flow target (from $FC32)
0x03FC40|$0F:$FC30:A5 00   	LDA $00    
0x03FC42|$0F:$FC32:D0 FC   	BNE $FC30  
0x03FC44|$0F:$FC34:A9 FF   	LDA #$FF   
0x03FC46|$0F:$FC36:85 00   	STA $00    
0x03FC48|$0F:$FC38:A2 08   	LDX #$08   
0x03FC4A|$0F:$FC3A:20 EE C1	JSR $C1EE  	; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF
0x03FC4D|$0F:$FC3D:A5 7D   	LDA $7D    
0x03FC4F|$0F:$FC3F:20 A2 FD	JSR $FDA2  	; 16-bit multiplication: set 16-bit ($10-$11) = A * #$16; returns low byte in A and clears C
0x03FC52|$0F:$FC42:65 7C   	ADC $7C    
0x03FC54|$0F:$FC44:AA      	TAX        
0x03FC55|$0F:$FC45:A9 5F   	LDA #$5F   
; control flow target (from $FC4D)
0x03FC57|$0F:$FC47:9D F8 06	STA $06F8,X	; start of main dialogue window
0x03FC5A|$0F:$FC4A:E8      	INX        
0x03FC5B|$0F:$FC4B:E0 B0   	CPX #$B0   
0x03FC5D|$0F:$FC4D:D0 F8   	BNE $FC47  
0x03FC5F|$0F:$FC4F:60      	RTS        

; print name of hero given by low 2 bits of A to $6119, terminated by #$FA
; control flow target (from $C853)
; external control flow target (from $02:$B2CF, $02:$B2E8, $02:$B330, $04:$9CD3, $06:$80D3, $06:$80FF, $06:$8108, $06:$8B4B, $06:$8BF5, $06:$8C15, $06:$8CCA, $06:$8D27, $06:$8E11, $06:$8E2C, $06:$8ED2, $06:$8EDE, $06:$8F0E, $06:$8F2F, $06:$8F44, $06:$8F55, $06:$8F60, $06:$8F6C, $06:$8F87, $06:$8FCF, $06:$8FE0, $06:$900F, $06:$9079, $06:$908B, $06:$91F7, $06:$9381, $06:$93E8, $06:$9404, $06:$9443, $06:$9574, $06:$95CF, $06:$9644, $06:$96FB, $06:$9739, $06:$9CA7, $06:$A21B, $06:$A248, $06:$BB54, $06:$BB70, $06:$BB79, $06:$BBD0, $07:$82E4)
0x03FC60|$0F:$FC50:48      	PHA        
0x03FC61|$0F:$FC51:29 03   	AND #$03   
0x03FC63|$0F:$FC53:85 10   	STA $10    
0x03FC65|$0F:$FC55:0A      	ASL        
0x03FC66|$0F:$FC56:0A      	ASL        
0x03FC67|$0F:$FC57:85 12   	STA $12    	; A & #$03 * 4
0x03FC69|$0F:$FC59:65 10   	ADC $10    
0x03FC6B|$0F:$FC5B:85 11   	STA $11    	; A & #$03 * 5
0x03FC6D|$0F:$FC5D:A0 00   	LDY #$00   
; control flow target (from $FC76)
0x03FC6F|$0F:$FC5F:A6 11   	LDX $11    
0x03FC71|$0F:$FC61:BD 13 01	LDA $0113,X	; Midenhall name bytes 0-3 + terminator
0x03FC74|$0F:$FC64:99 19 61	STA $6119,Y	; start of buffer for [monster(s)], [name], maybe more
0x03FC77|$0F:$FC67:A6 12   	LDX $12    
0x03FC79|$0F:$FC69:BD 86 01	LDA $0186,X	; Midenhall name bytes 4-7
0x03FC7C|$0F:$FC6C:99 1D 61	STA $611D,Y
0x03FC7F|$0F:$FC6F:E6 11   	INC $11    
0x03FC81|$0F:$FC71:E6 12   	INC $12    
0x03FC83|$0F:$FC73:C8      	INY        
0x03FC84|$0F:$FC74:C0 04   	CPY #$04   
0x03FC86|$0F:$FC76:D0 E7   	BNE $FC5F  
0x03FC88|$0F:$FC78:A0 08   	LDY #$08   
0x03FC8A|$0F:$FC7A:20 D7 FC	JSR $FCD7  	; update write index to trim trailing spaces
0x03FC8D|$0F:$FC7D:68      	PLA        
0x03FC8E|$0F:$FC7E:10 00   	BPL $FC80  	; append [end-FA] to string and swap return bank $94 back in; useless op
; append [end-FA] to string and swap return bank $94 back in
; control flow target (from $FC7E, $FCC3, $FCC5, $FCD5)
0x03FC90|$0F:$FC80:A9 FA   	LDA #$FA   	; [end-FA]
0x03FC92|$0F:$FC82:99 19 61	STA $6119,Y	; start of buffer for [monster(s)], [name], maybe more
0x03FC95|$0F:$FC85:20 C2 F6	JSR $F6C2  	; load bank specified by $94
0x03FC98|$0F:$FC88:60      	RTS        

; write monster name in A (+ monster number within its group in X, if > 0) to $6119
; external control flow target (from $04:$9CD9)
0x03FC99|$0F:$FC89:8E 8B 60	STX $608B  	; monster number within its group
0x03FC9C|$0F:$FC8C:48      	PHA        	; monster ID
0x03FC9D|$0F:$FC8D:A9 00   	LDA #$00   	; start with the first segment
0x03FC9F|$0F:$FC8F:8D AB 60	STA $60AB  	; which list segment we're dealing with
0x03FCA2|$0F:$FC92:A9 0B   	LDA #$0B   	; max length of first segment
0x03FCA4|$0F:$FC94:8D A0 60	STA $60A0  	; maximum string length; max segment length
0x03FCA7|$0F:$FC97:68      	PLA        	; monster ID
0x03FCA8|$0F:$FC98:20 B7 F3	JSR $F3B7  	; given monster ID in A, copy monster name segment to $0100 in reverse
0x03FCAB|$0F:$FC9B:A0 00   	LDY #$00   	; initialize write index to #$00
0x03FCAD|$0F:$FC9D:20 E8 FC	JSR $FCE8  	; copy $60A0 bytes of data from $00FF to $6119
0x03FCB0|$0F:$FCA0:20 D7 FC	JSR $FCD7  	; update write index to trim trailing spaces
0x03FCB3|$0F:$FCA3:A9 5F   	LDA #$5F   	; [space]
0x03FCB5|$0F:$FCA5:99 19 61	STA $6119,Y	; start of buffer for [monster(s)], [name], maybe more; write [space] to $6119,Y
0x03FCB8|$0F:$FCA8:C8      	INY        	; increment write index
0x03FCB9|$0F:$FCA9:98      	TYA        
0x03FCBA|$0F:$FCAA:48      	PHA        	; save write index for later
0x03FCBB|$0F:$FCAB:EE AB 60	INC $60AB  	; which list segment we're dealing with
0x03FCBE|$0F:$FCAE:A9 09   	LDA #$09   	; max length of second segment
0x03FCC0|$0F:$FCB0:8D A0 60	STA $60A0  	; maximum string length; max segment length
0x03FCC3|$0F:$FCB3:A5 10   	LDA $10    	; monster ID, set by previous call to $F3B7
0x03FCC5|$0F:$FCB5:20 B7 F3	JSR $F3B7  	; given monster ID in A, copy monster name segment to $0100 in reverse
0x03FCC8|$0F:$FCB8:68      	PLA        	; pull write index back into Y
0x03FCC9|$0F:$FCB9:A8      	TAY        
0x03FCCA|$0F:$FCBA:20 E8 FC	JSR $FCE8  	; copy $60A0 bytes of data from $00FF to $6119
0x03FCCD|$0F:$FCBD:20 D7 FC	JSR $FCD7  	; update write index to trim trailing spaces
0x03FCD0|$0F:$FCC0:AE 8B 60	LDX $608B  	; monster number within its group
0x03FCD3|$0F:$FCC3:F0 BB   	BEQ $FC80  	; append [end-FA] to string and swap return bank $94 back in
0x03FCD5|$0F:$FCC5:30 B9   	BMI $FC80  	; append [end-FA] to string and swap return bank $94 back in
0x03FCD7|$0F:$FCC7:A9 6A   	LDA #$6A   	; "-"
0x03FCD9|$0F:$FCC9:99 19 61	STA $6119,Y	; start of buffer for [monster(s)], [name], maybe more
0x03FCDC|$0F:$FCCC:C8      	INY        
0x03FCDD|$0F:$FCCD:8A      	TXA        	; monster number within its group
0x03FCDE|$0F:$FCCE:18      	CLC        
0x03FCDF|$0F:$FCCF:69 23   	ADC #$23   	; #$23 == "z" and A > 0, so this is the uppercase letter corresponding to the monster number within its group; net effect is e.g. "-A", "-B", etc.
0x03FCE1|$0F:$FCD1:99 19 61	STA $6119,Y	; start of buffer for [monster(s)], [name], maybe more
0x03FCE4|$0F:$FCD4:C8      	INY        
0x03FCE5|$0F:$FCD5:D0 A9   	BNE $FC80  	; append [end-FA] to string and swap return bank $94 back in
; update write index to trim trailing spaces
; control flow target (from $FC7A, $FCA0, $FCBD, $FCE5)
0x03FCE7|$0F:$FCD7:B9 18 61	LDA $6118,Y	; last byte written
0x03FCEA|$0F:$FCDA:C9 60   	CMP #$60   	; [no voice]
0x03FCEC|$0F:$FCDC:F0 04   	BEQ $FCE2  
0x03FCEE|$0F:$FCDE:C9 5F   	CMP #$5F   	; [space]
0x03FCF0|$0F:$FCE0:D0 05   	BNE $FCE7  
; control flow target (from $FCDC)
0x03FCF2|$0F:$FCE2:88      	DEY        	; if it's some kind of whitespace, decrement the write index
0x03FCF3|$0F:$FCE3:30 02   	BMI $FCE7  	; if Y became negative (oops - string is now 0 bytes), stop
0x03FCF5|$0F:$FCE5:D0 F0   	BNE $FCD7  	; update write index to trim trailing spaces
; control flow target (from $FCE0, $FCE3)
0x03FCF7|$0F:$FCE7:60      	RTS        

; copy $60A0 bytes of data from $00FF to $6119
; X is used as a read index, Y as a write index
; data gets copied in reverse order
; IN:
; A/X/C = irrelevant
; Y = current write index
; OUT:
; A = last byte copied (but calling code doesn't care)
; X = 0
; Y = current write index; this is important since the calling code needs to remember the write index from the first segment when dealing with the second segment
; C = unchanged
; control flow target (from $FC9D, $FCBA)
0x03FCF8|$0F:$FCE8:AE A0 60	LDX $60A0  	; maximum string length; initialize the read index to the value of $60A0
; control flow target (from $FCF3)
0x03FCFB|$0F:$FCEB:BD FF 00	LDA $00FF,X	; built-in offset from string copy buffer start at $0100
0x03FCFE|$0F:$FCEE:99 19 61	STA $6119,Y	; start of buffer for [monster(s)], [name], maybe more; write data to $6119,Y
0x03FD01|$0F:$FCF1:C8      	INY        	; increment write index
0x03FD02|$0F:$FCF2:CA      	DEX        	; decrement read index
0x03FD03|$0F:$FCF3:D0 F6   	BNE $FCEB  	; if the read index is not 0, loop back to $FCEB
0x03FD05|$0F:$FCF5:60      	RTS        	; otherwise the read index is 0, so we're done

; text engine: load bank specified by $60C6 (bank containing the desired text string)
; control flow target (from $FDD3, $FE16, $FE34)
0x03FD06|$0F:$FCF6:48      	PHA        
0x03FD07|$0F:$FCF7:AD C6 60	LDA $60C6  	; ROM bank containing the desired text string
0x03FD0A|$0F:$FCFA:20 D5 C3	JSR $C3D5  	; save A to $05F6, X to $43, and load bank specified by A
0x03FD0D|$0F:$FCFD:68      	PLA        
0x03FD0E|$0F:$FCFE:60      	RTS        

; external control flow target (from $02:$B6DB)
0x03FD0F|$0F:$FCFF:20 0F FD	JSR $FD0F  
0x03FD12|$0F:$FD02:EE 84 60	INC $6084  
0x03FD15|$0F:$FD05:20 0F FD	JSR $FD0F  
0x03FD18|$0F:$FD08:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
0x03FD1B|$0F:$FD0B:EE 84 60	INC $6084  
0x03FD1E|$0F:$FD0E:60      	RTS        

; control flow target (from $FB21, $FCFF, $FD05)
0x03FD1F|$0F:$FD0F:AD 84 60	LDA $6084  
0x03FD22|$0F:$FD12:8D 8C 60	STA $608C  
0x03FD25|$0F:$FD15:A9 05   	LDA #$05   
0x03FD27|$0F:$FD17:8D 8B 60	STA $608B  
; control flow target (from $FD34)
0x03FD2A|$0F:$FD1A:AE 85 60	LDX $6085  
0x03FD2D|$0F:$FD1D:BD F8 06	LDA $06F8,X	; start of main dialogue window
0x03FD30|$0F:$FD20:85 09   	STA $09    
0x03FD32|$0F:$FD22:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FD35|$0F:$FD25:C1	; $06:$8002

; data -> code
0x03FD36|$0F:$FD26:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03FD39|$0F:$FD29:EE 85 60	INC $6085  
0x03FD3C|$0F:$FD2C:EE 8B 60	INC $608B  
0x03FD3F|$0F:$FD2F:AD 8B 60	LDA $608B  
0x03FD42|$0F:$FD32:C9 1B   	CMP #$1B   
0x03FD44|$0F:$FD34:D0 E4   	BNE $FD1A  
0x03FD46|$0F:$FD36:60      	RTS        

; control flow target (from $FB76)
0x03FD47|$0F:$FD37:48      	PHA        
0x03FD48|$0F:$FD38:A5 7C   	LDA $7C    
0x03FD4A|$0F:$FD3A:8D 9E 60	STA $609E  	; menu current column
0x03FD4D|$0F:$FD3D:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FD50|$0F:$FD40:47	; $02:$800E; -> $02:$B687: if menu current column < #$16, CLC and RTS, otherwise do stuff

; data -> code
0x03FD51|$0F:$FD41:A5 7D   	LDA $7D    
0x03FD53|$0F:$FD43:20 A2 FD	JSR $FDA2  	; 16-bit multiplication: set 16-bit ($10-$11) = A * #$16; returns low byte in A and clears C
0x03FD56|$0F:$FD46:65 7C   	ADC $7C    
0x03FD58|$0F:$FD48:AA      	TAX        
0x03FD59|$0F:$FD49:68      	PLA        
0x03FD5A|$0F:$FD4A:C9 5F   	CMP #$5F   
0x03FD5C|$0F:$FD4C:F0 11   	BEQ $FD5F  
0x03FD5E|$0F:$FD4E:C9 65   	CMP #$65   
0x03FD60|$0F:$FD50:D0 14   	BNE $FD66  
0x03FD62|$0F:$FD52:A4 7C   	LDY $7C    
0x03FD64|$0F:$FD54:C0 01   	CPY #$01   
0x03FD66|$0F:$FD56:D0 0E   	BNE $FD66  
0x03FD68|$0F:$FD58:88      	DEY        
0x03FD69|$0F:$FD59:84 7C   	STY $7C    
0x03FD6B|$0F:$FD5B:CA      	DEX        
0x03FD6C|$0F:$FD5C:4C 66 FD	JMP $FD66  

; control flow target (from $FD4C)
0x03FD6F|$0F:$FD5F:A4 7C   	LDY $7C    
0x03FD71|$0F:$FD61:CC C8 60	CPY $60C8  	; speech sound effect / auto-indent flag
0x03FD74|$0F:$FD64:F0 3B   	BEQ $FDA1  
; control flow target (from $FD50, $FD56, $FD5C)
0x03FD76|$0F:$FD66:48      	PHA        
0x03FD77|$0F:$FD67:BD F8 06	LDA $06F8,X	; start of main dialogue window
0x03FD7A|$0F:$FD6A:85 09   	STA $09    
0x03FD7C|$0F:$FD6C:A8      	TAY        
0x03FD7D|$0F:$FD6D:68      	PLA        
0x03FD7E|$0F:$FD6E:C0 5F   	CPY #$5F   
0x03FD80|$0F:$FD70:D0 05   	BNE $FD77  
0x03FD82|$0F:$FD72:9D F8 06	STA $06F8,X	; start of main dialogue window
0x03FD85|$0F:$FD75:85 09   	STA $09    
; control flow target (from $FD70)
0x03FD87|$0F:$FD77:A5 8E   	LDA $8E    	; flag for in battle or not (#$FF)?
0x03FD89|$0F:$FD79:30 24   	BMI $FD9F  
0x03FD8B|$0F:$FD7B:AD C8 60	LDA $60C8  	; speech sound effect / auto-indent flag
0x03FD8E|$0F:$FD7E:F0 05   	BEQ $FD85  
0x03FD90|$0F:$FD80:A9 8F   	LDA #$8F   	; Music ID #$8F: speech SFX
0x03FD92|$0F:$FD82:20 61 C5	JSR $C561  	; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM])
; control flow target (from $FD7E)
0x03FD95|$0F:$FD85:A5 7C   	LDA $7C    
0x03FD97|$0F:$FD87:18      	CLC        
0x03FD98|$0F:$FD88:69 05   	ADC #$05   
0x03FD9A|$0F:$FD8A:8D 8B 60	STA $608B  
0x03FD9D|$0F:$FD8D:A5 7D   	LDA $7D    
0x03FD9F|$0F:$FD8F:18      	CLC        
0x03FDA0|$0F:$FD90:69 13   	ADC #$13   
0x03FDA2|$0F:$FD92:8D 8C 60	STA $608C  
0x03FDA5|$0F:$FD95:20 97 FE	JSR $FE97  	; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank

; code -> data
; indirect data load target
0x03FDA8|$0F:$FD98:C1	; $06:$8002

; data -> code
0x03FDA9|$0F:$FD99:20 FA C1	JSR $C1FA  	; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00
0x03FDAC|$0F:$FD9C:20 DC C1	JSR $C1DC  	; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF
; control flow target (from $FD79)
0x03FDAF|$0F:$FD9F:E6 7C   	INC $7C    
; control flow target (from $FD64)
0x03FDB1|$0F:$FDA1:60      	RTS        

; 16-bit multiplication: set 16-bit ($10-$11) = A * #$16; returns low byte in A and clears C
; control flow target (from $FB14, $FC3F, $FD43)
0x03FDB2|$0F:$FDA2:85 10   	STA $10    
0x03FDB4|$0F:$FDA4:A9 00   	LDA #$00   
0x03FDB6|$0F:$FDA6:85 11   	STA $11    
0x03FDB8|$0F:$FDA8:A2 10   	LDX #$10   
0x03FDBA|$0F:$FDAA:A9 16   	LDA #$16   
0x03FDBC|$0F:$FDAC:20 F4 F0	JSR $F0F4  	; 16-bit multiplication: set 16-bit ($00,X-$01,X) = ($00,X-$01,X) * A
0x03FDBF|$0F:$FDAF:A5 10   	LDA $10    
0x03FDC1|$0F:$FDB1:18      	CLC        
0x03FDC2|$0F:$FDB2:60      	RTS        

; scan through group of strings until we find the start of the desired string
; control flow target (from $FAA4)
0x03FDC3|$0F:$FDB3:A9 00   	LDA #$00   
0x03FDC5|$0F:$FDB5:8D D6 60	STA $60D6  	; bit index into the byte containing the 5-bit text token currently being processed
0x03FDC8|$0F:$FDB8:8D D2 60	STA $60D2  	; read index within current dictionary entry
0x03FDCB|$0F:$FDBB:A5 10   	LDA $10    	; low byte of string index
0x03FDCD|$0F:$FDBD:29 0F   	AND #$0F   	; chop it down to index within the current pointer
0x03FDCF|$0F:$FDBF:AA      	TAX        
0x03FDD0|$0F:$FDC0:F0 06   	BEQ $FDC8  	; if we want the first string in the pointer, nothing more to do here, so RTS
; otherwise scan through the pointer data to find the start of the desired string
; control flow target (from $FDC6)
0x03FDD2|$0F:$FDC2:20 C9 FD	JSR $FDC9  	; scan through current string pointer to find the start of the next string
0x03FDD5|$0F:$FDC5:CA      	DEX        
0x03FDD6|$0F:$FDC6:D0 FA   	BNE $FDC2  
; control flow target (from $FDC0)
0x03FDD8|$0F:$FDC8:60      	RTS        

; scan through current string pointer to find the start of the next string
; control flow target (from $FDC2)
0x03FDD9|$0F:$FDC9:8A      	TXA        
0x03FDDA|$0F:$FDCA:48      	PHA        
0x03FDDB|$0F:$FDCB:20 D3 FD	JSR $FDD3  	; scan through string until we reach an end token; updates read address in $55-$56
0x03FDDE|$0F:$FDCE:68      	PLA        
0x03FDDF|$0F:$FDCF:AA      	TAX        
0x03FDE0|$0F:$FDD0:A5 6D   	LDA $6D    
0x03FDE2|$0F:$FDD2:60      	RTS        

; scan through string until we reach an end token; updates read address in $55-$56
; control flow target (from $FDCB, $FDF0)
0x03FDE3|$0F:$FDD3:20 F6 FC	JSR $FCF6  	; text engine: load bank specified by $60C6 (bank containing the desired text string)
0x03FDE6|$0F:$FDD6:A9 00   	LDA #$00   
0x03FDE8|$0F:$FDD8:8D D3 60	STA $60D3  	; secondary text table offset for C0 - C3 tables
; control flow target (from $FDE8)
0x03FDEB|$0F:$FDDB:20 3D FE	JSR $FE3D  	; set A to the current text dictionary index
0x03FDEE|$0F:$FDDE:20 F7 FD	JSR $FDF7  	; after reading a text token, update the read address in $55-$56 and bit index in $60D6
0x03FDF1|$0F:$FDE1:C9 1C   	CMP #$1C   	; #$1C - #$1F are the C0 - C3 table switch tokens
0x03FDF3|$0F:$FDE3:90 06   	BCC $FDEB  	; if token >= #$1C, we know it's a switch token and the next token is not an end token, so skip over the next token
0x03FDF5|$0F:$FDE5:20 F7 FD	JSR $FDF7  	; after reading a text token, update the read address in $55-$56 and bit index in $60D6
0x03FDF8|$0F:$FDE8:4C DB FD	JMP $FDDB  	; loop to read the next token

; control flow target (from $FDE3)
0x03FDFB|$0F:$FDEB:AD 8B 60	LDA $608B  	; text engine: $608B = dictionary index
0x03FDFE|$0F:$FDEE:C9 05   	CMP #$05   	; the text tokens 0 - 4 are end tokens
0x03FE00|$0F:$FDF0:B0 E1   	BCS $FDD3  	; scan through string until we reach an end token; updates read address in $55-$56; if not an end token, keep scanning
0x03FE02|$0F:$FDF2:A9 FC   	LDA #$FC   	; if end token, set A and $6D to #$FC and RTS
0x03FE04|$0F:$FDF4:85 6D   	STA $6D    	; stash #$FC in $6A since caller needs to pop stuff off the stack
0x03FE06|$0F:$FDF6:60      	RTS        

; after reading a text token, update the read address in $55-$56 and bit index in $60D6
; control flow target (from $FDDE, $FDE5)
; external control flow target (from $02:$B3C6, $02:$B3E3)
0x03FE07|$0F:$FDF7:48      	PHA        
0x03FE08|$0F:$FDF8:AD D6 60	LDA $60D6  	; bit index into the byte containing the 5-bit text token currently being processed
0x03FE0B|$0F:$FDFB:C9 03   	CMP #$03   	; if all 5 bits we need are already in A, keep using it, otherwise update read position in $55-$56
0x03FE0D|$0F:$FDFD:90 26   	BCC $FE25  	; $FE29 would be a better target :p
0x03FE0F|$0F:$FDFF:E6 55   	INC $55    	; pointer to start of sub pointer data, low byte
0x03FE11|$0F:$FE01:D0 02   	BNE $FE05  
0x03FE13|$0F:$FE03:E6 56   	INC $56    	; pointer to start of sub pointer data, high byte
; control flow target (from $FE01)
0x03FE15|$0F:$FE05:A5 55   	LDA $55    	; pointer to start of sub pointer data, low byte; check for $55-$56 == $BFD7; if yes, switch to bank #$02, if no, keep using current address
0x03FE17|$0F:$FE07:C9 D7   	CMP #$D7   
0x03FE19|$0F:$FE09:D0 1A   	BNE $FE25  
0x03FE1B|$0F:$FE0B:A5 56   	LDA $56    	; pointer to start of sub pointer data, high byte
0x03FE1D|$0F:$FE0D:C9 BF   	CMP #$BF   
0x03FE1F|$0F:$FE0F:D0 14   	BNE $FE25  
0x03FE21|$0F:$FE11:A9 02   	LDA #$02   
0x03FE23|$0F:$FE13:8D C6 60	STA $60C6  	; ROM bank containing the desired text string
0x03FE26|$0F:$FE16:20 F6 FC	JSR $FCF6  	; text engine: load bank specified by $60C6 (bank containing the desired text string)
0x03FE29|$0F:$FE19:A9 2E   	LDA #$2E   	; useless
0x03FE2B|$0F:$FE1B:AD 32 FE	LDA $FE32  	; set $55-$56 to new address in bank #$02
0x03FE2E|$0F:$FE1E:85 55   	STA $55    	; pointer to start of sub pointer data, low byte
0x03FE30|$0F:$FE20:AD 33 FE	LDA $FE33  
0x03FE33|$0F:$FE23:85 56   	STA $56    	; pointer to start of sub pointer data, high byte
; control flow target (from $FDFD, $FE09, $FE0F)
0x03FE35|$0F:$FE25:AD D6 60	LDA $60D6  	; bit index into the byte containing the 5-bit text token currently being processed
0x03FE38|$0F:$FE28:18      	CLC        
0x03FE39|$0F:$FE29:69 05   	ADC #$05   	; we read 5 bits, so update the bit index
0x03FE3B|$0F:$FE2B:29 07   	AND #$07   
0x03FE3D|$0F:$FE2D:8D D6 60	STA $60D6  	; bit index into the byte containing the 5-bit text token currently being processed
0x03FE40|$0F:$FE30:68      	PLA        
0x03FE41|$0F:$FE31:60      	RTS        


; code -> data
; data load target (from $FE1B)
0x03FE42|$0F:$FE32:B2
; data load target (from $FE20)
0x03FE43|$0F:$FE33:   B7	; $02:$B7B2

; data -> code
; swap in the right text bank, set A to the current dictionary index, swap in bank #$02
; external control flow target (from $02:$B3AB)
0x03FE44|$0F:$FE34:20 F6 FC	JSR $FCF6  	; text engine: load bank specified by $60C6 (bank containing the desired text string)
0x03FE47|$0F:$FE37:20 3D FE	JSR $FE3D  	; set A to the current text dictionary index
0x03FE4A|$0F:$FE3A:4C 70 F7	JMP $F770  	; load ROM bank #$02

; set A to the current text dictionary index
; control flow target (from $FDDB, $FE37)
0x03FE4D|$0F:$FE3D:AD D6 60	LDA $60D6  	; bit index into the byte containing the 5-bit text token currently being processed
0x03FE50|$0F:$FE40:0A      	ASL        
0x03FE51|$0F:$FE41:A8      	TAY        
0x03FE52|$0F:$FE42:B9 5C FE	LDA $FE5C,Y	; jump table for functions to convert the current 5-bit text token into a dictionary index in A
0x03FE55|$0F:$FE45:85 57   	STA $57    	; pointer to start of main pointer table, low byte
0x03FE57|$0F:$FE47:B9 5D FE	LDA $FE5D,Y
0x03FE5A|$0F:$FE4A:85 58   	STA $58    	; pointer to start of main pointer table, high byte
; BUG: this reads the first 2 bytes of ($55) *before* the code for checking whether the read position needs to jump to bank 2 runs
0x03FE5C|$0F:$FE4C:A0 01   	LDY #$01   
0x03FE5E|$0F:$FE4E:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03FE60|$0F:$FE50:8D 8C 60	STA $608C  	; text engine: $608C = string byte #2
0x03FE63|$0F:$FE53:88      	DEY        
0x03FE64|$0F:$FE54:B1 55   	LDA ($55),Y	; pointer to start of sub pointer data, low byte
0x03FE66|$0F:$FE56:8D 8B 60	STA $608B  	; text engine: $608B = string byte #1
0x03FE69|$0F:$FE59:6C 57 00	JMP ($0057)	; pointer to start of main pointer table, low byte; convert the current 5-bit text token into a dictionary index in A


; code -> data
; jump table for functions to convert the current 5-bit text token into a dictionary index in A
; indexed data load target (from $FE42)
0x03FE6C|$0F:$FE5C:6C
; indexed data load target (from $FE47)
0x03FE6D|$0F:$FE5D:   FE	; $0F:$FE6C; token is in bits 7-3 of A
0x03FE6E|$0F:$FE5E:6D FE	; $0F:$FE6D; token is in bits 6-2 of A
0x03FE70|$0F:$FE60:6E FE	; $0F:$FE6E; token is in bits 5-1 of A
0x03FE72|$0F:$FE62:8D FE	; $0F:$FE8D; token is in bits 4-0 of A (yay)
0x03FE74|$0F:$FE64:84 FE	; $0F:$FE84; token is in bits 3-0 of A + bit 7 of $608C
0x03FE76|$0F:$FE66:7E FE	; $0F:$FE7E; token is in bits 2-0 of A + bits 7-6 of $608C
0x03FE78|$0F:$FE68:78 FE	; $0F:$FE78; token is in bits 1-0 of A + bits 7-5 of $608C
0x03FE7A|$0F:$FE6A:72 FE	; $0F:$FE72; token is in bit 0 of A + bits 7-4 of $608C

; data -> code
; token is in bits 7-3 of A
; indirect control flow target (via $FE5C)
0x03FE7C|$0F:$FE6C:4A      	LSR        
; token is in bits 6-2 of A
; indirect control flow target (via $FE5E)
0x03FE7D|$0F:$FE6D:4A      	LSR        
; token is in bits 5-1 of A
; indirect control flow target (via $FE60)
0x03FE7E|$0F:$FE6E:4A      	LSR        
0x03FE7F|$0F:$FE6F:4C 8D FE	JMP $FE8D  	; token is in bits 4-0 of A (yay)

; token is in bit 0 of A + bits 7-4 of $608C
; indirect control flow target (via $FE6A)
0x03FE82|$0F:$FE72:0E 8C 60	ASL $608C  	; string byte #2
0x03FE85|$0F:$FE75:2E 8B 60	ROL $608B  	; text engine: $608B = string byte #1
; token is in bits 1-0 of A + bits 7-5 of $608C
; indirect control flow target (via $FE68)
0x03FE88|$0F:$FE78:0E 8C 60	ASL $608C  	; string byte #2
0x03FE8B|$0F:$FE7B:2E 8B 60	ROL $608B  	; text engine: $608B = string byte #1
; token is in bits 2-0 of A + bits 7-6 of $608C
; indirect control flow target (via $FE66)
0x03FE8E|$0F:$FE7E:0E 8C 60	ASL $608C  	; string byte #2
0x03FE91|$0F:$FE81:2E 8B 60	ROL $608B  	; text engine: $608B = string byte #1
; token is in bits 3-0 of A + bit 7 of $608C
; indirect control flow target (via $FE64)
0x03FE94|$0F:$FE84:0E 8C 60	ASL $608C  	; string byte #2
0x03FE97|$0F:$FE87:2E 8B 60	ROL $608B  	; text engine: $608B = string byte #1
0x03FE9A|$0F:$FE8A:AD 8B 60	LDA $608B  	; text engine: $608B = string byte #1
; token is in bits 4-0 of A (yay)
; control flow target (from $FE6F)
; indirect control flow target (via $FE62)
0x03FE9D|$0F:$FE8D:29 1F   	AND #$1F   
0x03FE9F|$0F:$FE8F:18      	CLC        
0x03FEA0|$0F:$FE90:6D D3 60	ADC $60D3  	; secondary text table offset for C0 - C3 tables
0x03FEA3|$0F:$FE93:8D 8B 60	STA $608B  	; text engine: $608B = dictionary index
0x03FEA6|$0F:$FE96:60      	RTS        

; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank
; BUG: does LDA before PHP, so status of N and Z flags are lost
; control flow target (from $C696, $C6C4, $C6D7, $C6DB, $C6F6, $C886, $C894, $CC9B, $D15C, $D16E, $D2E7, $D2F7, $D33C, $D356, $EE06, $EE7B, $EF58, $F04F, $F0BC, $F4A9, $F4E3, $F5E1, $F5F7, $F611, $F787, $F83A, $FB4A, $FB5E, $FB7A, $FB9B, $FB9F, $FBA3, $FBA8, $FBAD, $FBD6, $FBF4, $FD22, $FD3D, $FD95)
; external control flow target (from $02:$B74B, $02:$BE00, $02:$BE2C, $02:$BE34, $02:$BEA1, $06:$B0A5, $07:$87F1, $08:$80C9, $0A:$80F2, $0A:$813B)
0x03FEA7|$0F:$FE97:8D 94 01	STA $0194  
0x03FEAA|$0F:$FE9A:8E 95 01	STX $0195  
0x03FEAD|$0F:$FE9D:8C 96 01	STY $0196  
0x03FEB0|$0F:$FEA0:AD F6 05	LDA $05F6  	; current bank
0x03FEB3|$0F:$FEA3:48      	PHA        
0x03FEB4|$0F:$FEA4:08      	PHP        
0x03FEB5|$0F:$FEA5:20 0E FF	JSR $FF0E  	; from the perspective of the caller (which always pushes 2 extra bytes to the stack before calling us), increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank
0x03FEB8|$0F:$FEA8:28      	PLP        
0x03FEB9|$0F:$FEA9:AC 96 01	LDY $0196  
0x03FEBC|$0F:$FEAC:AE 95 01	LDX $0195  
0x03FEBF|$0F:$FEAF:AD 94 01	LDA $0194  
0x03FEC2|$0F:$FEB2:20 C8 FE	JSR $FEC8  	; execute ($D6)
0x03FEC5|$0F:$FEB5:08      	PHP        
0x03FEC6|$0F:$FEB6:8D 94 01	STA $0194  
0x03FEC9|$0F:$FEB9:68      	PLA        
0x03FECA|$0F:$FEBA:85 D6   	STA $D6    
0x03FECC|$0F:$FEBC:68      	PLA        	; original value of $05F6 (current bank)
0x03FECD|$0F:$FEBD:20 BB FF	JSR $FFBB  	; save A to $05F6, X to $43, and load bank specified by A
0x03FED0|$0F:$FEC0:A5 D6   	LDA $D6    	; P
0x03FED2|$0F:$FEC2:48      	PHA        
0x03FED3|$0F:$FEC3:AD 94 01	LDA $0194  
0x03FED6|$0F:$FEC6:28      	PLP        
0x03FED7|$0F:$FEC7:60      	RTS        

; execute ($D6)
; control flow target (from $FEB2)
0x03FED8|$0F:$FEC8:6C D6 00	JMP ($00D6)


; code -> unknown
; must be unused since it's invalid
0x03FEDB|$0F:$FECB:20 DA FE	; JSR $FEDA  
0x03FEDC|$0F:$FECC:DA      	; INVALID OPCODE
0x03FEDD|$0F:$FECD:FE A5 D6	; INC $D6A5,X
0x03FEDE|$0F:$FECE:A5 D6   	; LDA $D6    
0x03FEDF|$0F:$FECF:D6 95   	; DEC $95,X  
0x03FEE0|$0F:$FED0:95 00   	; STA $00,X  
0x03FEE1|$0F:$FED1:00      	; BRK        
0x03FEE2|$0F:$FED2:A5 D7   	; LDA $D7    
0x03FEE3|$0F:$FED3:D7      	; INVALID OPCODE
0x03FEE4|$0F:$FED4:95 01   	; STA $01,X  
0x03FEE5|$0F:$FED5:01 AD   	; ORA ($AD,X)
0x03FEE6|$0F:$FED6:AD 94 01	; LDA $0194  
0x03FEE7|$0F:$FED7:94 01   	; STY $01,X  
0x03FEE8|$0F:$FED8:01 60   	; ORA ($60,X)
0x03FEE9|$0F:$FED9:60      	; RTS        

; unknown -> code
; parse byte following JSR for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank
; control flow target (from $E4EC)
; external control flow target (from $02:$B1C0)
0x03FEEA|$0F:$FEDA:8D 94 01	STA $0194  
0x03FEED|$0F:$FEDD:8E 95 01	STX $0195  
0x03FEF0|$0F:$FEE0:8C 96 01	STY $0196  
0x03FEF3|$0F:$FEE3:AD F6 05	LDA $05F6  	; current bank
0x03FEF6|$0F:$FEE6:48      	PHA        
0x03FEF7|$0F:$FEE7:48      	PHA        
0x03FEF8|$0F:$FEE8:20 0E FF	JSR $FF0E  	; from the perspective of the caller (which always pushes 2 extra bytes to the stack before calling us), increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank
0x03FEFB|$0F:$FEEB:68      	PLA        
0x03FEFC|$0F:$FEEC:68      	PLA        
0x03FEFD|$0F:$FEED:20 BB FF	JSR $FFBB  	; save A to $05F6, X to $43, and load bank specified by A
0x03FF00|$0F:$FEF0:AC 96 01	LDY $0196  
0x03FF03|$0F:$FEF3:AE 95 01	LDX $0195  
0x03FF06|$0F:$FEF6:AD 94 01	LDA $0194  
0x03FF09|$0F:$FEF9:60      	RTS        

; increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank
; control flow target (from $E4F8, $ECFB)
0x03FF0A|$0F:$FEFA:08      	PHP        
0x03FF0B|$0F:$FEFB:48      	PHA        
0x03FF0C|$0F:$FEFC:8E 95 01	STX $0195  
0x03FF0F|$0F:$FEFF:8C 96 01	STY $0196  
0x03FF12|$0F:$FF02:20 0E FF	JSR $FF0E  	; from the perspective of the caller (which always pushes 2 extra bytes to the stack before calling us), increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank
0x03FF15|$0F:$FF05:AC 96 01	LDY $0196  
0x03FF18|$0F:$FF08:AE 95 01	LDX $0195  
0x03FF1B|$0F:$FF0B:68      	PLA        
0x03FF1C|$0F:$FF0C:28      	PLP        
0x03FF1D|$0F:$FF0D:60      	RTS        

; from the perspective of the caller (which always pushes 2 extra bytes to the stack before calling us), increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank
; control flow target (from $FEA5, $FEE8, $FF02)
0x03FF1E|$0F:$FF0E:BA      	TSX        
0x03FF1F|$0F:$FF0F:FE 05 01	INC $0105,X
0x03FF22|$0F:$FF12:D0 03   	BNE $FF17  
0x03FF24|$0F:$FF14:FE 06 01	INC $0106,X
; control flow target (from $FF12)
0x03FF27|$0F:$FF17:BD 05 01	LDA $0105,X
0x03FF2A|$0F:$FF1A:85 D6   	STA $D6    
0x03FF2C|$0F:$FF1C:BD 06 01	LDA $0106,X
0x03FF2F|$0F:$FF1F:85 D7   	STA $D7    
0x03FF31|$0F:$FF21:A0 00   	LDY #$00   
0x03FF33|$0F:$FF23:B1 D6   	LDA ($D6),Y
0x03FF35|$0F:$FF25:20 33 FF	JSR $FF33  	; parse A into bank and pointer indices and load specified bank
0x03FF38|$0F:$FF28:BD 00 80	LDA $8000,X
0x03FF3B|$0F:$FF2B:85 D6   	STA $D6    
0x03FF3D|$0F:$FF2D:BD 01 80	LDA $8001,X
0x03FF40|$0F:$FF30:85 D7   	STA $D7    
0x03FF42|$0F:$FF32:60      	RTS        

; parse A into bank and pointer indices and load specified bank
; bank is high 3 bits of A (but 8 if 0 and 6 if 5), pointer is low 5 bits of A (but low 6 if bank is 6)
; control flow target (from $F3EA, $FF25)
0x03FF43|$0F:$FF33:48      	PHA        
0x03FF44|$0F:$FF34:2A      	ROL        
0x03FF45|$0F:$FF35:2A      	ROL        
0x03FF46|$0F:$FF36:2A      	ROL        
0x03FF47|$0F:$FF37:2A      	ROL        
0x03FF48|$0F:$FF38:29 07   	AND #$07   
0x03FF4A|$0F:$FF3A:D0 04   	BNE $FF40  
0x03FF4C|$0F:$FF3C:A9 08   	LDA #$08   
0x03FF4E|$0F:$FF3E:D0 06   	BNE $FF46  
; control flow target (from $FF3A)
0x03FF50|$0F:$FF40:C9 05   	CMP #$05   
0x03FF52|$0F:$FF42:D0 02   	BNE $FF46  
0x03FF54|$0F:$FF44:A9 06   	LDA #$06   
; control flow target (from $FF3E, $FF42)
0x03FF56|$0F:$FF46:20 BB FF	JSR $FFBB  	; save A to $05F6, X to $43, and load bank specified by A
0x03FF59|$0F:$FF49:68      	PLA        
0x03FF5A|$0F:$FF4A:48      	PHA        
0x03FF5B|$0F:$FF4B:29 E0   	AND #$E0   
0x03FF5D|$0F:$FF4D:AA      	TAX        
0x03FF5E|$0F:$FF4E:68      	PLA        
0x03FF5F|$0F:$FF4F:29 3F   	AND #$3F   
0x03FF61|$0F:$FF51:E0 A0   	CPX #$A0   
0x03FF63|$0F:$FF53:F0 02   	BEQ $FF57  
0x03FF65|$0F:$FF55:29 1F   	AND #$1F   
; control flow target (from $FF53)
0x03FF67|$0F:$FF57:0A      	ASL        
0x03FF68|$0F:$FF58:AA      	TAX        
0x03FF69|$0F:$FF59:60      	RTS        

; external control flow target (from $07:$81E7, $07:$84EC, $07:$8529, $07:$8556)
0x03FF6A|$0F:$FF5A:20 AF C7	JSR $C7AF  
0x03FF6D|$0F:$FF5D:4C 90 FF	JMP $FF90  	; load bank 7

; external control flow target (from $07:$81CE)
0x03FF70|$0F:$FF60:20 4F D1	JSR $D14F  
0x03FF73|$0F:$FF63:4C 90 FF	JMP $FF90  	; load bank 7

; external control flow target (from $07:$8692)
0x03FF76|$0F:$FF66:20 04 C5	JSR $C504  
0x03FF79|$0F:$FF69:4C 90 FF	JMP $FF90  	; load bank 7

; external indirect control flow target (via $07:$8798)
; indirect control flow target
0x03FF7C|$0F:$FF6C:20 C2 E5	JSR $E5C2  
0x03FF7F|$0F:$FF6F:4C 90 FF	JMP $FF90  	; load bank 7

; external indirect control flow target (via $07:$879C)
; indirect control flow target
0x03FF82|$0F:$FF72:20 36 E6	JSR $E636  
0x03FF85|$0F:$FF75:4C 90 FF	JMP $FF90  	; load bank 7

; external indirect control flow target (via $07:$8796)
; indirect control flow target
0x03FF88|$0F:$FF78:20 97 E7	JSR $E797  
0x03FF8B|$0F:$FF7B:4C 90 FF	JMP $FF90  	; load bank 7

; external indirect control flow target (via $07:$879A)
; indirect control flow target
0x03FF8E|$0F:$FF7E:20 B4 E6	JSR $E6B4  
0x03FF91|$0F:$FF81:4C 90 FF	JMP $FF90  	; load bank 7

; external control flow target (from $07:$8231, $07:$8242, $07:$8278, $07:$8330, $07:$835F, $07:$8374, $07:$8385, $07:$83FB, $07:$849C, $07:$84D5, $07:$84F6, $07:$8503, $07:$851C, $07:$8533, $07:$8560, $07:$857F, $07:$85EE, $07:$8776)
0x03FF94|$0F:$FF84:20 D2 CC	JSR $CCD2  	; execute scripted motion
0x03FF97|$0F:$FF87:4C 90 FF	JMP $FF90  	; load bank 7

; external control flow target (from $07:$8291, $07:$82B1, $07:$82DC, $07:$856B, $07:$85AC, $07:$85E4, $07:$8651, $07:$8675, $07:$86E2, $07:$8712)
0x03FF9A|$0F:$FF8A:20 CB D8	JSR $D8CB  
0x03FF9D|$0F:$FF8D:4C 90 FF	JMP $FF90  	; load bank 7

; load bank 7
; control flow target (from $FF5D, $FF63, $FF69, $FF6F, $FF75, $FF7B, $FF81, $FF87, $FF8D)
0x03FFA0|$0F:$FF90:A9 07   	LDA #$07   
0x03FFA2|$0F:$FF92:85 94   	STA $94    	; return bank for various function calls, doubles as index of selected option for multiple-choice menus
0x03FFA4|$0F:$FF94:4C C2 F6	JMP $F6C2  	; load bank specified by $94


; code -> free
0x03FFA7|$0F:$FF97:FF
; ... skipping $21 FF bytes
0x03FFC9|$0F:$FFB9:FF

; free -> data
; data load target (from $D37A)
0x03FFCA|$0F:$FFBA:FF

; data -> code
; save A to $05F6, X to $43, and load bank specified by A
; control flow target (from $C3D5, $FEBD, $FEED, $FF46)
0x03FFCB|$0F:$FFBB:8D F6 05	STA $05F6  	; current bank
0x03FFCE|$0F:$FFBE:86 43   	STX $43    
; load bank specified by A
; control flow target (from $C3D9)
0x03FFD0|$0F:$FFC0:78      	SEI        
0x03FFD1|$0F:$FFC1:8D FF FF	STA $FFFF  
0x03FFD4|$0F:$FFC4:4A      	LSR        
0x03FFD5|$0F:$FFC5:8D FF FF	STA $FFFF  
0x03FFD8|$0F:$FFC8:4A      	LSR        
0x03FFD9|$0F:$FFC9:8D FF FF	STA $FFFF  
0x03FFDC|$0F:$FFCC:4A      	LSR        
0x03FFDD|$0F:$FFCD:8D FF FF	STA $FFFF  
0x03FFE0|$0F:$FFD0:4A      	LSR        
0x03FFE1|$0F:$FFD1:8D FF FF	STA $FFFF  
0x03FFE4|$0F:$FFD4:EA      	NOP        
0x03FFE5|$0F:$FFD5:EA      	NOP        
0x03FFE6|$0F:$FFD6:60      	RTS        

; reset vector
; indirect control flow target (via $FFFC)
0x03FFE7|$0F:$FFD7:78      	SEI        
0x03FFE8|$0F:$FFD8:EE DE FF	INC $FFDE  	; #$80; used to reset MMC1 shift register and switch to last-fixed-bank mode
0x03FFEB|$0F:$FFDB:4C AF C5	JMP $C5AF  	; reset vector handler


; code -> data
; #$80; used to reset MMC1 shift register and switch to last-fixed-bank mode
; data load target (from $C60B, $FFD8)
0x03FFEE|$0F:$FFDE:80

; data -> unknown
0x03FFEF|$0F:$FFDF:44      	; INVALID OPCODE
0x03FFF0|$0F:$FFE0:52      	; INVALID OPCODE
0x03FFF1|$0F:$FFE1:41 47   	; EOR ($47,X)
0x03FFF2|$0F:$FFE2:47      	; INVALID OPCODE
0x03FFF3|$0F:$FFE3:4F      	; INVALID OPCODE
0x03FFF4|$0F:$FFE4:4E 20 57	; LSR $5720  
0x03FFF5|$0F:$FFE5:20 57 41	; JSR $4157  
0x03FFF6|$0F:$FFE6:57      	; INVALID OPCODE
0x03FFF7|$0F:$FFE7:41 52   	; EOR ($52,X)
0x03FFF8|$0F:$FFE8:52      	; INVALID OPCODE
0x03FFF9|$0F:$FFE9:52      	; INVALID OPCODE
0x03FFFA|$0F:$FFEA:49 4F   	; EOR #$4F   
0x03FFFB|$0F:$FFEB:4F      	; INVALID OPCODE
0x03FFFC|$0F:$FFEC:52      	; INVALID OPCODE
0x03FFFD|$0F:$FFED:20 49 49	; JSR $4949  
0x03FFFE|$0F:$FFEE:49 49   	; EOR #$49   
0x03FFFF|$0F:$FFEF:49 C7   	; EOR #$C7   
0x040000|$0F:$FFF0:C7      	; INVALID OPCODE
0x040001|$0F:$FFF1:AA      	; TAX        
0x040002|$0F:$FFF2:00      	; BRK        
0x040003|$0F:$FFF3:00      	; BRK        
0x040004|$0F:$FFF4:48      	; PHA        
0x040005|$0F:$FFF5:04      	; INVALID OPCODE
0x040006|$0F:$FFF6:01 0F   	; ORA ($0F,X)
0x040007|$0F:$FFF7:0F      	; INVALID OPCODE
0x040008|$0F:$FFF8:07      	; INVALID OPCODE
0x040009|$0F:$FFF9:9D 00 C0	; STA $C000,X

; unknown -> data
0x04000A|$0F:$FFFA:00 C0	; $0F:$C000; NMI vector
0x04000C|$0F:$FFFC:D7 FF	; $0F:$FFD7; reset vector
0x04000E|$0F:$FFFE:AB C5	; $0F:$C5AB; IRQ/BRK vector handler